- updated documentation;

- changed a function's name.

doc/tinmop.man

@@ -410,6 +410,9 @@ pass-focus-next
 \fBC-a      \fP
 show-about-window
 .TP
+\fBA        \fP
+show-announcements
+.TP
 \fBC-h A    \fP
 apropos-help-global
 .TP
@@ -656,6 +659,9 @@ delete-notifications
 \fBP        \fP
 poll-vote
 .TP
+\fBp        \fP
+show-parent-post
+.TP
 \fBU        \fP
 thread-mark-prevent-delete-selected-message
 .TP

doc/tinmop.org

@@ -282,6 +282,7 @@
 - C d       :: clear-cache
 - C-I       :: pass-focus-next
 - C-a       :: show-about-window
+- A         :: show-announcements
 - C-h A     :: apropos-help-global
 - C-h a     :: apropos-help
 - C-h h     :: print-quick-help
@@ -371,6 +372,7 @@
 - M-u       :: delete-and-move-previous
 - N d       :: delete-notifications
 - P         :: poll-vote
+- p         :: show-parent-post
 - U         :: thread-mark-prevent-delete-selected-message
 - X         :: refresh-thread-totally
 - \\ \\     :: repeat-search

etc/init.lisp

@@ -337,7 +337,7 @@
 
 (define-key "P"         #'poll-vote                                   *thread-keymap*)
 
-(define-key "p"         #'show-parent-message                         *thread-keymap*)
+(define-key "p"         #'show-parent-post                            *thread-keymap*)
 
 (define-key "U"         #'thread-mark-prevent-delete-selected-message *thread-keymap*)
 

src/package.lisp

@@ -3171,7 +3171,7 @@
    :print-mentions
    :delete-notifications
    :show-announcements
-   :show-parent-message))
+   :show-parent-post))
 
 (defpackage :scheduled-events
   (:use

src/ui-goodies.lisp

@@ -3490,7 +3490,7 @@ gemini client certificates!)."
   (info-message (_ "Getting all announcements, please wait…"))
   (push-event (make-instance 'show-announcements-event)))
 
-(defun show-parent-message ()
+(defun show-parent-post ()
   (when-let* ((selected-row     (line-oriented-window:selected-row-fields *thread-window*))
               (new-window-width (truncate (* (windows:win-width *main-window*) 2/3)))
               (status-id        (actual-author-message-id selected-row))