cage
/
tinmop
mirror of https://codeberg.org/cage/tinmop/
1
0
Fork 0
Code Issues

- added docstring to 'gemini-images-montage'

This commit is contained in:
cage 2022-12-10 14:47:11 +01:00
parent 183d8c296a
commit 6348e57ea2
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/ui-goodies.lisp
View File

@ -1500,7 +1500,10 @@ It an existing file path is provided the command will refuse to run."
:test #'string=)
(defun gemini-images-montage ()
#+montage-bin
"Generate an image formed that contains all the images linked to a
gemini page and arranged in a grid layout, the resulting image is then
displayed using the standard image viewer installed on the system."
#+montage-bin
(when-let* ((window *message-window*)
(metadata (message-window:metadata window))
(links (gemini-viewer:gemini-metadata-links metadata))