# applet::tooltip-set TEXT-MAYBE-MULTILINE
# whenever they like.
#
+# Icon:
+#
+# Caller should call:
+# applet::setimage IMAGE
+# as necessary.
+#
# Inner window subprocess:
#
# Caller that needs access to inner window should define
# Alternatively caller may call applet::setup-button-menu $b
# which will generate a menu .m$b which the user can configure
# and which will automatically be posted and unposted etc.
+# In this case the caller should arrange that all of their
+# menus, when an item is selected, call
+# applet::msel
wm withdraw .
uplevel #0 $tooltip_on_vis
}
+#----- simple images -----
+
+proc setimage {image} {
+ .i configure -image $image
+}
+
}
destroy [frame .i.i.make-exist]
bind .i <<IconConfigure>> { innerwindow-resetup-required IconConfigure }
}
-
-
-
-proc setimage {image} {
- .i configure -image $image
-}