eufon

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | README | LICENSE

commit a928c40cd0e62d6cc49089ab1ef41b4e577e26d7
parent d831ccbb67e0deb049bb5f48b811529d98b71d51
Author: Daniel Barlow <dan@telent.net>
Date:   Wed,  9 Mar 2022 23:45:52 +0000

open a blank webview if no URLs on command line

Diffstat:
Mjust/just.fnl | 11+++++++----
1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/just/just.fnl b/just/just.fnl @@ -137,10 +137,13 @@ progress, trough { (container:pack_start progress-bar false false 0) (container:pack_start viewplex.widget true true 0) - (each [_ url (ipairs arg)] - (let [v (Webview.new)] - (v:visit url) - (viewplex:add-view v))) + (if (. arg 1) + (each [_ url (ipairs arg)] + (let [v (Webview.new)] + (v:visit url) + (viewplex:add-view v))) + (viewplex:add-view + (doto (Webview.new) (: :visit "about:blank")))) (window:add container) (window:show_all))