1
0
Fork 0

- changed variable names so that is clear that the '-o' switch can open different kind of URI, not only gemini.

This commit is contained in:
cage 2022-02-05 16:28:40 +01:00
parent bf781ee291
commit fd53894b2e
3 changed files with 8 additions and 8 deletions

View File

@ -64,11 +64,11 @@
:description (_ "Notify messages that mentions the user")
:short #\m
:long "notify-mentions")
(:name :open-gemini-url
:description (_ "Open gemini url")
(:name :open-net-url
:description (_ "Open net address")
:short #\o
:arg-parser #'identity
:long "open-gemini-url")
:long "open-net-address")
(:name :gemini-full-screen-mode
:description (_ "Start as gemini client only.")
:short #\G
@ -100,7 +100,7 @@
(defparameter *notify-mentions* nil)
(defparameter *gemini-url* nil)
(defparameter *net-address* nil)
(defparameter *update-timeline-climb-message-tree* nil)
@ -134,7 +134,7 @@
(print-version)
(os-utils:exit-program))
(set-option-variable options :folder *start-folder*)
(set-option-variable options :open-gemini-url *gemini-url*)
(set-option-variable options :open-net-address *net-address*)
(set-option-variable options :timeline *start-timeline*)
(set-option-variable options :reset-timeline-pagination *reset-timeline-pagination*)
(set-option-variable options :update-timeline *update-timeline*)

View File

@ -165,8 +165,8 @@ etc.) happened"
(_ "Unable to load module ~a")
command-line:*module-file*)
:as-error t))))
(if command-line:*gemini-url*
(ui:open-net-address command-line:*gemini-url*)
(if command-line:*net-address*
(ui:open-net-address command-line:*net-address*)
(progn
(let ((program-events:*process-events-immediately* t))
(when command-line:*start-timeline*

View File

@ -1355,7 +1355,7 @@
:*check-follow-requests*
:*reset-timeline-pagination*
:*notify-mentions*
:*gemini-url*
:*net-address*
:*update-timeline-climb-message-tree*
:*gemini-full-screen-mode*
:*print-lisp-dependencies*