summaryrefslogtreecommitdiffstats
path: root/library/ttk/button.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'library/ttk/button.tcl')
-rw-r--r--library/ttk/button.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/library/ttk/button.tcl b/library/ttk/button.tcl
index 3baefe2..22032e4 100644
--- a/library/ttk/button.tcl
+++ b/library/ttk/button.tcl
@@ -28,7 +28,7 @@ bind TButton <<Invoke>> { ttk::button::activate %W }
bind TButton <ButtonPress-1> \
{ %W instate !disabled { ttk::clickToFocus %W; %W state pressed } }
bind TButton <ButtonRelease-1> \
- { %W instate {pressed !disabled} { %W state !pressed; %W invoke } }
+ { %W instate pressed { %W state !pressed; %W instate !disabled { %W invoke } } }
bind TButton <Button1-Leave> \
{ %W state !pressed }
bind TButton <Button1-Enter> \