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

- [gemini] used function 'maybe-notify'.

This commit is contained in:
cage 2023-01-13 16:33:22 +01:00
parent 572eb5c1b7
commit 3824e29171
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/gemini-viewer.lisp
View File

@ -480,12 +480,12 @@
(maybe-render-preformat-wrapper file-stream wrapper-object) (maybe-render-preformat-wrapper file-stream wrapper-object)
(cond (cond
((not (downloading-allowed-p wrapper-object)) ((not (downloading-allowed-p wrapper-object))
(ui:notify (_ "Gemini document downloading aborted"))) (maybe-notify (_ "Gemini document downloading aborted")))
((rendering-in-tinmop-p) ((rendering-in-tinmop-p)
(maybe-render-toc) (maybe-render-toc)
(maybe-render-links) (maybe-render-links)
(maybe-render-focus-mark) (maybe-render-focus-mark)
(ui:notify (_ "Gemini document downloading completed")) (maybe-notify (_ "Gemini document downloading completed"))
(setf (stream-status wrapper-object) :completed) (setf (stream-status wrapper-object) :completed)
(when (and fragment (when (and fragment
(swconf:config-gemini-fragment-as-regex-p)) (swconf:config-gemini-fragment-as-regex-p))