Revision: 54972
http://brlcad.svn.sourceforge.net/brlcad/?rev=54972&view=rev
Author: bob1961
Date: 2013-03-29 16:39:40 +0000 (Fri, 29 Mar 2013)
Log Message:
-----------
A few minor tweaks to the Command widget. Updated
Command::print_more_args_prompt to make the insertion point visible. Updated
Command::invoke to print the prompt string whether we have a more-args
interruption or not.
Modified Paths:
--------------
brlcad/trunk/src/tclscripts/lib/Command.tcl
Modified: brlcad/trunk/src/tclscripts/lib/Command.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/lib/Command.tcl 2013-03-29 16:23:22 UTC (rev
54971)
+++ brlcad/trunk/src/tclscripts/lib/Command.tcl 2013-03-29 16:39:40 UTC (rev
54972)
@@ -382,10 +382,10 @@
if {$more_args_interrupted} {
set more_args_interrupted 0
- } else {
- print_prompt
}
+ print_prompt
+
# get rid of oldest output
set nlines [expr int([$w index end])]
if {$nlines > $itk_option(-maxlines)} {
@@ -1369,6 +1369,7 @@
::itcl::body Command::print_more_args_prompt {args} {
eval $itk_component(text) insert insert $args
+ $itk_component(text) see insert
}
::itcl::body Command::print_prompt {} {
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
------------------------------------------------------------------------------
Own the Future-Intel(R) Level Up Game Demo Contest 2013
Rise to greatness in Intel's independent game demo contest. Compete
for recognition, cash, and the chance to get your game on Steam.
$5K grand prize plus 10 genre and skill prizes. Submit your demo
by 6/6/13. http://altfarm.mediaplex.com/ad/ck/12124-176961-30367-2
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
