cage/tinmop
1
0
Fork 0
mirror of https://codeberg.org/cage/tinmop/ synced 2024-12-30 00:39:54 +01:00
Code Issues

- improved docstring for tour-mode.

Browse Source
This commit is contained in:
cage 2021-05-02 13:49:20 +02:00
parent ba316e84a0
commit 5cbde371da
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/ui-goodies.lisp
View File

@ -1891,7 +1891,11 @@ gemini://gemini.circumlunar.space/docs/companion/subscription.gmi
(defun tour-mode-link () (defun tour-mode-link ()
"Enable \"tour mode\". Ask for link indices, each link "Enable \"tour mode\". Ask for link indices, each link
corresponding to the index will be saved in a special queue that corresponding to the index will be saved in a special queue that
can be opened using `next-tour-link' in a last-in last-out way." can be opened using `next-tour-link' in a last-in last-out way.
If user input is made by a single word only (i.e. a string with no
spaces), the input is used as a regular expression to collect
matching links (matching name or URI)."
(with-accessors ((links open-message-link-window::links)) *open-message-link-window* (with-accessors ((links open-message-link-window::links)) *open-message-link-window*
(ask-string-input (tour-mode-on-input-completed-clsr links) (ask-string-input (tour-mode-on-input-completed-clsr links)
:prompt (format nil (_ "link indices: "))))) :prompt (format nil (_ "link indices: ")))))