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

- forced opening of TOC window when loading a net address as instructed from the command line (i.e. using the '-o' switch).

This commit is contained in:
cage 2022-02-17 19:01:48 +01:00
parent 9e62a10995
commit 283930efef
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/main.lisp
View File

@ -169,7 +169,9 @@ etc.) happened"
command-line:*module-file*)
:as-error t))))
(if command-line:*net-address*
(ui:open-net-address command-line:*net-address*)
(progn
(gemini-page-toc:open-toc-window specials:*message-window*)
(ui:open-net-address command-line:*net-address*))
(progn
(let ((program-events:*process-events-immediately* t))
(when command-line:*start-timeline*