nbdview: Add -topmost attribute.

diff --git a/2019-fosdem/nbdview/nbdraid.tcl b/2019-fosdem/nbdview/nbdraid.tcl
index a6dada1..f594f29 100755 (executable)
--- a/2019-fosdem/nbdview/nbdraid.tcl
+++ b/2019-fosdem/nbdview/nbdraid.tcl
@@ -111,6 +111,7 @@ for { set i 1 } { $i <= $N } { incr i } {
 }
 
 # Set up the window.
+wm attributes . -topmost 1
 wm title . "nbdraid"
 wm resizable . false false
 

diff --git a/2019-fosdem/nbdview/nbdview.tcl b/2019-fosdem/nbdview/nbdview.tcl
index 9e41014..0e87690 100755 (executable)
--- a/2019-fosdem/nbdview/nbdview.tcl
+++ b/2019-fosdem/nbdview/nbdview.tcl
@@ -77,6 +77,7 @@ set h [nbdcanvas .f.c $logfile $size $blocksize $width $scale]
 pack .f.c -anchor center -expand 0 -fill none
 
 # Set up the window.
+wm attributes . -topmost 1
 wm title . "nbdview $logfile"
 wm resizable . false false