- updated version number;

- updated documentation;

- [GUI] fixed again the mouse pointer's shape when moving in the gemtext window: sometimes got stuck in the 'hand2' shape.

NEWS.org

@@ -1,3 +1,7 @@
+* 2023-05-17 version 0.9.9.141
+   - New feature
+     added A GUI for the gemini protocol.
+
 * 2023-01-30 version 0.9.9.141
 
   - Bugfix

README.org

@@ -50,6 +50,7 @@
      - xdg-open;
      - openssl;
      - unzip (command line utitlity to decompress zip file);
+     - TK wish interpreter;
      - your favourite editor (default: nano).
 
    + optional recommended programs:
@@ -105,6 +106,13 @@
      # apt-get install libssl-dev
      #+END_SRC
 
+** Foreign (TCL language) library
+   - tkimg
+
+     #+BEGIN_SRC sh
+     # apt-get install libtk-img
+     #+END_SRC
+
 * Install
 
 ** Using guix

README.txt

@@ -13,6 +13,7 @@ Table of Contents
 .. 1. Programs
 .. 2. Lisp Libraries
 .. 3. Foreign (C language) library
+.. 4. Foreign (TCL language) library
 4. Install
 .. 1. Using guix
 .. 2. From source
@@ -92,6 +93,7 @@ Table of Contents
     • xdg-open;
     • openssl;
     • unzip (command line utitlity to decompress zip file);
+    • TK wish interpreter;
     • your favourite editor (default: nano).
 
   ⁃ optional recommended programs:
@@ -153,6 +155,16 @@ Table of Contents
     └────
 
 
+3.4 Foreign (TCL language) library
+──────────────────────────────────
+
+  • tkimg
+
+    ┌────
+    │ # apt-get install libtk-img
+    └────
+
+
 4 Install
 ═════════
 

configure

@@ -1,6 +1,6 @@
 #! /bin/sh
 # Guess values for system-dependent variables and create Makefiles.
-# Generated by GNU Autoconf 2.71 for tinmop 0.9.9.141.
+# Generated by GNU Autoconf 2.71 for tinmop 0.9.9.1414.
 #
 # Report bugs to <https://notabug.org/cage/tinmop/>.
 #
@@ -611,8 +611,8 @@ MAKEFLAGS=
 # Identity of this package.
 PACKAGE_NAME='tinmop'
 PACKAGE_TARNAME='tinmop'
-PACKAGE_VERSION='0.9.9.141'
+PACKAGE_VERSION='0.9.9.1414'
-PACKAGE_STRING='tinmop 0.9.9.141'
+PACKAGE_STRING='tinmop 0.9.9.1414'
 PACKAGE_BUGREPORT='https://notabug.org/cage/tinmop/'
 PACKAGE_URL='https://www.autistici.org/interzona/tinmop.html'
 
@@ -1317,7 +1317,7 @@ if test "$ac_init_help" = "long"; then
   # Omit some internal or obsolete options to make the list less imposing.
   # This message is too long to be a string in the A/UX 3.1 sh.
   cat <<_ACEOF
-\`configure' configures tinmop 0.9.9.141 to adapt to many kinds of systems.
+\`configure' configures tinmop 0.9.9.1414 to adapt to many kinds of systems.
 
 Usage: $0 [OPTION]... [VAR=VALUE]...
 
@@ -1388,7 +1388,7 @@ fi
 
 if test -n "$ac_init_help"; then
   case $ac_init_help in
-     short | recursive ) echo "Configuration of tinmop 0.9.9.141:";;
+     short | recursive ) echo "Configuration of tinmop 0.9.9.1414:";;
    esac
   cat <<\_ACEOF
 
@@ -1493,7 +1493,7 @@ fi
 test -n "$ac_init_help" && exit $ac_status
 if $ac_init_version; then
   cat <<\_ACEOF
-tinmop configure 0.9.9.141
+tinmop configure 0.9.9.1414
 generated by GNU Autoconf 2.71
 
 Copyright (C) 2021 Free Software Foundation, Inc.
@@ -1697,7 +1697,7 @@ cat >config.log <<_ACEOF
 This file contains any messages produced by compilers while
 running configure, to aid debugging if configure makes a mistake.
 
-It was created by tinmop $as_me 0.9.9.141, which was
+It was created by tinmop $as_me 0.9.9.1414, which was
 generated by GNU Autoconf 2.71.  Invocation command line was
 
   $ $0$ac_configure_args_raw
@@ -2959,7 +2959,7 @@ fi
 
 # Define the identity of the package.
  PACKAGE='tinmop'
- VERSION='0.9.9.141'
+ VERSION='0.9.9.1414'
 
 
 printf "%s\n" "#define PACKAGE \"$PACKAGE\"" >>confdefs.h
@@ -8387,7 +8387,7 @@ cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
 # report actual input values of CONFIG_FILES etc. instead of their
 # values after options handling.
 ac_log="
-This file was extended by tinmop $as_me 0.9.9.141, which was
+This file was extended by tinmop $as_me 0.9.9.1414, which was
 generated by GNU Autoconf 2.71.  Invocation command line was
 
   CONFIG_FILES    = $CONFIG_FILES
@@ -8447,7 +8447,7 @@ ac_cs_config_escaped=`printf "%s\n" "$ac_cs_config" | sed "s/^ //; s/'/'\\\\\\\\
 cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
 ac_cs_config='$ac_cs_config_escaped'
 ac_cs_version="\\
-tinmop config.status 0.9.9.141
+tinmop config.status 0.9.9.1414
 configured by $0, generated by GNU Autoconf 2.71,
   with options \\"\$ac_cs_config\\"
 

configure.ac

@@ -15,7 +15,7 @@ dnl You should have received a copy of the GNU General Public License
 dnl along with this program.
 dnl If not, see [[http://www.gnu.org/licenses/][http://www.gnu.org/licenses/]].
 
-AC_INIT([tinmop],[0.9.9.141],[https://notabug.org/cage/tinmop/],[tinmop],[https://www.autistici.org/interzona/tinmop.html])
+AC_INIT([tinmop],[0.9.9.1414],[https://notabug.org/cage/tinmop/],[tinmop],[https://www.autistici.org/interzona/tinmop.html])
 
 AM_INIT_AUTOMAKE([-Wall foreign])
 

doc/tinmop.man

@@ -20,7 +20,6 @@ information about this topic can be found on the following websites:
 .IP \(em 4
 \fIhttps://docs.joinmastodon.org/\fP .
 
-
 .PP
 Tinmop proposes an extensible terminal interface to connect with
 Pleroma social network, the gemini and gopher protocol
@@ -76,14 +75,21 @@ Start using this timeline
 \fB-u, --update-timeline           \fP
 Update the selected timeline
 .TP
+\fB-U, --gemini-gui-client-only    \fP
+Start the program as A gemini GUI client
+.TP
+\fB-S, --gemini-gui-server-only    \fP
+Start as gemini gui server only
+.TP
 \fB-v, --version                   \fP
 Print program version and exit
 
 .SH "Usage"
 .PP
-Users of Tinmop supposed to interact with the social network
+Users of Tinmop supposed to interact with the social network using a
-using a terminal interface (TUI), The terminal screen layout is
+terminal interface (TUI, but starting  with version 0.9.9.1414 a GUI
-sketched below:
+for gemini  is available),  The terminal  screen layout  is sketched
+below:
 
 .RS
 .nf

doc/tinmop.org

@@ -17,7 +17,6 @@
   - [[https://pleroma.social/]] ;
   - [[https://docs.joinmastodon.org/]] .
 
-
   Tinmop proposes an extensible terminal interface to connect with
   Pleroma social network, the gemini and gopher protocol
 
@@ -48,13 +47,16 @@
   + -h, --help                       :: print program help and exit
   + -t, --timeline TIMELINE-NAME     :: Start using this timeline
   + -u, --update-timeline            :: Update the selected timeline
+  + -U, --gemini-gui-client-only     :: Start the program as A gemini GUI client
+  + -S, --gemini-gui-server-only     :: Start as gemini gui server only
   + -v, --version                    :: Print program version and exit
 
 * Usage
 
-  Users of Tinmop supposed to interact with the social network
+  Users of Tinmop supposed to interact with the social network using a
-  using a terminal interface (TUI), The terminal screen layout is
+  terminal interface (TUI, but starting  with version 0.9.9.1414 a GUI
-  sketched below:
+  for gemini  is available),  The terminal  screen layout  is sketched
+  below:
 
   #+NAME: screen-layout
   #+BEGIN_SRC text

src/gui/client/main-window.lisp

@@ -1061,6 +1061,11 @@
         (gui:bind toc-listbox
                   #$<<ListboxSelect>>$
                   (toc-callback-clsr main-window))
+        (gui:bind gemtext-widget
+                  #$<Enter>$
+                  (lambda (e)
+                    (declare (ignore e))
+                    (gui:configure-mouse-pointer gemtext-widget (gui:find-cursor :xterm))))
         (setf (gui:command go-button)            (open-iri-clsr main-window t))
         (setf (gui:command reload-button)        (reload-iri-clsr main-window))
         (setf (gui:command back-button)          (back-iri-clsr main-window))

tinmop.asd

@@ -18,7 +18,7 @@
 (defsystem :tinmop
   :author      "cage"
   :license     "GPLv3"
-  :version     "0.9.9.141"
+  :version     "0.9.9.1414"
   :pathname    "src"
   :serial      t
   :bug-tracker "https://notabug.org/cage/tinmop/issues"