summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2001-08-27 01:44:48 (GMT)
committerdgp <dgp@users.sourceforge.net>2001-08-27 01:44:48 (GMT)
commitab3740cf60e35ad20ac9a37728fa26fcf2fdf2f6 (patch)
treee82cb3186e59b7e1c8cd9593ef81865001fe0e1d
parenta08cb15f41881df14b5e7448fdb1e682adebb94f (diff)
downloadtk-ab3740cf60e35ad20ac9a37728fa26fcf2fdf2f6.zip
tk-ab3740cf60e35ad20ac9a37728fa26fcf2fdf2f6.tar.gz
tk-ab3740cf60e35ad20ac9a37728fa26fcf2fdf2f6.tar.bz2
* Corrected TIP 44 typo
that broke binding. Thanks to "Michal" for the fix. [Bug 455468]
-rw-r--r--ChangeLog6
-rw-r--r--library/text.tcl4
2 files changed, 8 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index a27d7b0..5562516 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2001-08-26 Don Porter <dgp@users.sourceforge.net>
+
+ * library/text.tcl (<Shift-Up> binding): Corrected TIP 44 typo
+ that broke binding. Thanks to "Michal" for the fix.
+ [Bug 455468]
+
2001-08-23 Jeff Hobbs <jeffh@ActiveState.com>
* unix/configure:
diff --git a/library/text.tcl b/library/text.tcl
index c3ff764..9abc9ae 100644
--- a/library/text.tcl
+++ b/library/text.tcl
@@ -3,7 +3,7 @@
# This file defines the default bindings for Tk text widgets and provides
# procedures that help in implementing the bindings.
#
-# RCS: @(#) $Id: text.tcl,v 1.16 2001/08/01 16:21:11 dgp Exp $
+# RCS: @(#) $Id: text.tcl,v 1.17 2001/08/27 01:44:48 dgp Exp $
#
# Copyright (c) 1992-1994 The Regents of the University of California.
# Copyright (c) 1994-1997 Sun Microsystems, Inc.
@@ -108,7 +108,7 @@ bind Text <Shift-Right> {
tk::TextKeySelect %W [%W index {insert + 1c}]
}
bind Text <Shift-Up> {
- tkT::extKeySelect %W [tk::TextUpDownLine %W -1]
+ tk::TextKeySelect %W [tk::TextUpDownLine %W -1]
}
bind Text <Shift-Down> {
tk::TextKeySelect %W [tk::TextUpDownLine %W 1]