summaryrefslogtreecommitdiff
path: root/systems/texlive/tlnet/tlpkg/tltcl/lib/tk8.6/clrpick.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/tltcl/lib/tk8.6/clrpick.tcl')
-rw-r--r--systems/texlive/tlnet/tlpkg/tltcl/lib/tk8.6/clrpick.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/systems/texlive/tlnet/tlpkg/tltcl/lib/tk8.6/clrpick.tcl b/systems/texlive/tlnet/tlpkg/tltcl/lib/tk8.6/clrpick.tcl
index e408d037ed..d67c67fd4e 100644
--- a/systems/texlive/tlnet/tlpkg/tltcl/lib/tk8.6/clrpick.tcl
+++ b/systems/texlive/tlnet/tlpkg/tltcl/lib/tk8.6/clrpick.tcl
@@ -316,7 +316,7 @@ proc ::tk::dialog::color::BuildDialog {w} {
# Accelerator bindings
bind $lab <<AltUnderlined>> [list focus $ent]
- bind $w <KeyPress-Escape> [list tk::ButtonInvoke $data(cancelBtn)]
+ bind $w <Escape> [list tk::ButtonInvoke $data(cancelBtn)]
bind $w <Alt-Key> [list tk::AltKeyInDialog $w %A]
wm protocol $w WM_DELETE_WINDOW [list tk::dialog::color::CancelCmd $w]