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 0aa2b9495a8c56c278663e3fd755830e7de54cdb..57270a245c6e4363d059df2e0485a2c0a07371cf 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
 }