From fc74ea10adf5074f3464e08552a5fbd540c0243d Mon Sep 17 00:00:00 2001
From: plugd <plugd@thelambdalab.xyz>
Date: Sun, 29 Dec 2019 00:16:43 +1100
Subject: [PATCH] Visualizer window always on top.

---
 visualizer.scm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/visualizer.scm b/visualizer.scm
index 8215202..3a914e2 100644
--- a/visualizer.scm
+++ b/visualizer.scm
@@ -19,6 +19,7 @@
           (lambda ()
             (apply print args))))
       (wish% "wm title . \"MARS Visualizer\"")
+      (wish% "wm attributes . -topmost true")
       (wish% "frame .fb -borderwidth 10")
       (wish% "pack .fb -side top")
       (let loop ((remaining-palette palette))
-- 
2.20.1