Changeset 2157 for trunk/lang/tcl/scripts/types/string.tcl

Timestamp:

Mar 27, 2011 3:13:21 PM (13 years ago)

Author:

mmc

Message:

Added support for -tooltip options on all attributes, and added descriptions
of attributes to all objects. This gives the user pop-up help inside the
builder.

File:

• trunk/lang/tcl/scripts/types/string.tcl (modified) (2 diffs)

trunk/lang/tcl/scripts/types/string.tcl

@@ -20 +20 @@
             value -lines 1
             value -validate ""
+            value -tooltip ""
         }
 
@@ -27 +28 @@
             text $win.scrl.text -width 10 -height $params(-lines) -wrap word
             $win.scrl contents $win.scrl.text
+            Rappture::Tooltip::for $win.scrl.text $params(-tooltip)
         } else {
             entry $win.str
             pack $win.str -fill x
+            Rappture::Tooltip::for $win.str $params(-tooltip)
         }
         set _win $win