diff options
| author | jenglish <jenglish@flightlab.com> | 2008-12-03 18:44:49 (GMT) |
|---|---|---|
| committer | jenglish <jenglish@flightlab.com> | 2008-12-03 18:44:49 (GMT) |
| commit | be03330f5858260351f40d4c3dffb0363d358ee5 (patch) | |
| tree | e50af7dbf34fa6fba912218b8b2ee694ef0f76e8 /library/ttk | |
| parent | ebcb804ce2070734ebccaae2d4fa9398bf0332cf (diff) | |
| download | tk-be03330f5858260351f40d4c3dffb0363d358ee5.zip tk-be03330f5858260351f40d4c3dffb0363d358ee5.tar.gz tk-be03330f5858260351f40d4c3dffb0363d358ee5.tar.bz2 | |
Add new "hover" state
(patch from Pat Thoyts; needed to support proper visual feedback on Vista).
Diffstat (limited to 'library/ttk')
| -rw-r--r-- | library/ttk/combobox.tcl | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/library/ttk/combobox.tcl b/library/ttk/combobox.tcl index 581c227..5b93374 100644 --- a/library/ttk/combobox.tcl +++ b/library/ttk/combobox.tcl @@ -1,5 +1,5 @@ # -# $Id: combobox.tcl,v 1.16 2008/11/29 00:43:48 patthoyts Exp $ +# $Id: combobox.tcl,v 1.17 2008/12/03 18:44:50 jenglish Exp $ # # Combobox bindings. # @@ -61,8 +61,6 @@ bind TCombobox <Double-ButtonPress-1> { ttk::combobox::Press "2" %W %x %y } bind TCombobox <Triple-ButtonPress-1> { ttk::combobox::Press "3" %W %x %y } bind TCombobox <B1-Motion> { ttk::combobox::Drag %W %x } bind TCombobox <Motion> { ttk::combobox::Motion %W %x %y } -bind TCombobox <Enter> {%W instate !disabled {%W state active}} -bind TCombobox <Leave> {%W state !active} bind TCombobox <MouseWheel> { ttk::combobox::Scroll %W [expr {%D/-120}] } if {[tk windowingsystem] eq "x11"} { |