summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2017-08-24 19:27:11 (GMT)
committerfvogel <fvogelnew1@free.fr>2017-08-24 19:27:11 (GMT)
commit17fd24a6b2a649dca794ec65683b355c03b6d015 (patch)
tree06cbd7c473c58162c348e8d723e4937a76248fb7
parent64c77244f40edcd6aaf4216aaf79b1b2bfae0528 (diff)
parentc8c5f3de21786ee81047e190e06a3e7f59d5ebcc (diff)
downloadtk-17fd24a6b2a649dca794ec65683b355c03b6d015.zip
tk-17fd24a6b2a649dca794ec65683b355c03b6d015.tar.gz
tk-17fd24a6b2a649dca794ec65683b355c03b6d015.tar.bz2
Fix [3295446]: Make the insertion cursor always visible when browsing console history. Patch from Andy Goth.
-rw-r--r--library/console.tcl2
1 files changed, 2 insertions, 0 deletions
diff --git a/library/console.tcl b/library/console.tcl
index ba68ccc..355a43b 100644
--- a/library/console.tcl
+++ b/library/console.tcl
@@ -286,6 +286,7 @@ proc ::tk::ConsoleHistory {cmd} {
}
.console delete promptEnd end
.console insert promptEnd $cmd {input stdin}
+ .console see end
}
next {
incr HistNum
@@ -302,6 +303,7 @@ proc ::tk::ConsoleHistory {cmd} {
}
.console delete promptEnd end
.console insert promptEnd $cmd {input stdin}
+ .console see end
}
reset {
set HistNum 1