Revision: 45222
http://brlcad.svn.sourceforge.net/brlcad/?rev=45222&view=rev
Author: bob1961
Date: 2011-06-23 19:05:11 +0000 (Thu, 23 Jun 2011)
Log Message:
-----------
Modified the "gets" proc to use the last line in getsVal.
Modified Paths:
--------------
brlcad/trunk/src/tclscripts/mged/text.tcl
Modified: brlcad/trunk/src/tclscripts/mged/text.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/mged/text.tcl 2011-06-23 01:16:31 UTC (rev
45221)
+++ brlcad/trunk/src/tclscripts/mged/text.tcl 2011-06-23 19:05:11 UTC (rev
45222)
@@ -326,14 +326,9 @@
if {[lindex $lines end] == {}} {
set lines [lreplace $lines end end]
}
-
- if {[llength $lines] == 1} {
- set vname [lindex $lines 0]
- } else {
- # first line is the gets line, skip it
- set vname [lindex $lines 1]
- }
+ set vname [lindex $lines end]
+
# if a var is provided, return the length. otherwise return the
# string itself. this matches gets behavior.
if {$len == 1} {
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
------------------------------------------------------------------------------
Simplify data backup and recovery for your virtual environment with vRanger.
Installation's a snap, and flexible recovery options mean your data is safe,
secure and there when you need it. Data protection magic?
Nope - It's vRanger. Get your free trial download today.
http://p.sf.net/sfu/quest-sfdev2dev
_______________________________________________
BRL-CAD Source Commits mailing list
brlcad-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
