From 5871afe19735a3e8e1a8c6dc2aeb0c92293aae4c Mon Sep 17 00:00:00 2001
From: Daniel Barlow <dan@telent.net>
Date: Mon, 7 Mar 2022 18:56:36 +0000
Subject: [PATCH] hide stop/refresh when loading is/isn't in progress

---
 just/just.fnl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/just/just.fnl b/just/just.fnl
index 4fdfada..cadccaa 100644
--- a/just/just.fnl
+++ b/just/just.fnl
@@ -78,7 +78,10 @@ progress, trough {
       (widget:pack_end show-overview false false 2)
 
       (webview:listen :uri #(url:set_text $1))
-
+      (webview:listen :estimated-load-progress
+                      (fn [fraction]
+                        (tset stop :visible (< fraction 1))
+                        (tset refresh :visible (>= fraction 1))))
       {
        :widget widget
        }))