diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-01-08 21:24:05 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-01-08 21:24:05 (GMT) |
| commit | f727d949629624c339f47614726e0a88a6948527 (patch) | |
| tree | 08e4a4ce78d83cf7c9b02fe520d15828bbffcf65 | |
| parent | a64433313deba5147c3a93551d0d93206d5f4a58 (diff) | |
| parent | fa95ec58b5800b356b9b7523011fe55264f60cee (diff) | |
| download | tk-f727d949629624c339f47614726e0a88a6948527.zip tk-f727d949629624c339f47614726e0a88a6948527.tar.gz tk-f727d949629624c339f47614726e0a88a6948527.tar.bz2 | |
Merge 8.7
| -rw-r--r-- | library/console.tcl | 2 | ||||
| -rw-r--r-- | tests/bell.test | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/library/console.tcl b/library/console.tcl index 2ff0029..ade0145 100644 --- a/library/console.tcl +++ b/library/console.tcl @@ -622,7 +622,7 @@ proc ::tk::ConsoleBind {w} { ## ## Bindings for doing special things based on certain keys ## - bind PostConsole <parenright> { + bind PostConsole <)> { if {"\\" ne [%W get insert-2c]} { ::tk::console::MatchPair %W \( \) promptEnd } diff --git a/tests/bell.test b/tests/bell.test index 4cf7596..2f5efee 100644 --- a/tests/bell.test +++ b/tests/bell.test @@ -28,7 +28,7 @@ test bell-1.4 {bell command} -body { test bell-1.5 {bell command} -body { bell -nice -nice -nice -} -returnCodes {ok} -result {} ;#keep -result {} and -retutnCodes {ok} for clarity? +} -returnCodes {ok} -result {} ;#keep -result {} and -returnCodes {ok} for clarity? test bell-1.6 {bell command} -body { bell -displayof . -nice |