diff options
author | dgp <dgp@users.sourceforge.net> | 2011-06-06 22:06:07 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2011-06-06 22:06:07 (GMT) |
commit | 1a3bb9c68a97c79e52cff4a3ecf1fed6065985d1 (patch) | |
tree | e97a209a0de1adc679dbf9d5c4c146263ac0a0e9 /library | |
parent | c2704bf225e6776ce585a4a96c9e4253c82e8e77 (diff) | |
parent | 2da308287ac0cb828ac2fd46fa33981a0a80c547 (diff) | |
download | tk-1a3bb9c68a97c79e52cff4a3ecf1fed6065985d1.zip tk-1a3bb9c68a97c79e52cff4a3ecf1fed6065985d1.tar.gz tk-1a3bb9c68a97c79e52cff4a3ecf1fed6065985d1.tar.bz2 |
Restore proper NUL output to the [console]. [Bug 2546087]
Diffstat (limited to 'library')
-rw-r--r-- | library/console.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/console.tcl b/library/console.tcl index d9c788b..5df7927 100644 --- a/library/console.tcl +++ b/library/console.tcl @@ -677,7 +677,7 @@ proc ::tk::ConsoleInsert {w s} { proc ::tk::ConsoleOutput {dest string} { set w .console - $w insert output [string map {\0 \u25a1} $string] $dest + $w insert output $string $dest ::tk::console::ConstrainBuffer $w $::tk::console::maxLines $w see insert } |