wv tray docs

2026-04-30 23:01:43 +02:00
parent 46db50956a
commit c2db35c6fc
5 changed files with 167 additions and 10 deletions
@@ -113,7 +113,9 @@
      (unless (eq? counter-thread #f)
        (send this message 'warning "Cannot close window"
              "Cannot close this window while the counter runs"))
-      (eq? counter-thread #f))
+      (if (eq? counter-thread #f)
+          (super can-close?)
+          #f))

    (define start-stop-btn #f)