chiark / gitweb /
raise tooltip
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Tue, 6 Nov 2012 11:21:36 +0000 (11:21 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Tue, 6 Nov 2012 11:21:36 +0000 (11:21 +0000)
applet.tcl

index 0aa2b94..57270a2 100644 (file)
@@ -174,6 +174,7 @@ proc tooltip-show {x y} {
     incr y 9
     wm geometry .tt +$x+$y
     wm deiconify .tt
+    raise .tt
     uplevel #0 $tooltip_on_vis
 }