Revision: 41140
http://brlcad.svn.sourceforge.net/brlcad/?rev=41140&view=rev
Author: bob1961
Date: 2010-10-26 19:04:25 +0000 (Tue, 26 Oct 2010)
Log Message:
-----------
Minor mods to DataUtils::appendGlobalData and DataUtils::updateGlobalData for
handling groups that contain whitespace.
Modified Paths:
--------------
brlcad/trunk/src/tclscripts/archer/DataUtils.tcl
Modified: brlcad/trunk/src/tclscripts/archer/DataUtils.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/archer/DataUtils.tcl 2010-10-26 19:02:29 UTC
(rev 41139)
+++ brlcad/trunk/src/tclscripts/archer/DataUtils.tcl 2010-10-26 19:04:25 UTC
(rev 41140)
@@ -54,7 +54,6 @@
$_archer putString "Please select a group before appending to
$_attr_name."
return
}
-
if {[catch {$_ged attr get _GLOBAL $_attr_name} dataList]} {
set dataList {}
}
@@ -66,7 +65,7 @@
eval lappend subDataList $_data
set dataList [lreplace $dataList $i $i $subDataList]
} else {
- lappend dataList [eval list $_group $_data]
+ lappend dataList [eval list [list $_group] $_data]
set subDataList [lindex $dataList end]
}
@@ -604,7 +603,7 @@
}
set data [$_ged $_data_cmd $_data_subcmd]
- set gdl [lreplace $gdl $i $i [eval list $_group $data]]
+ set gdl [lreplace $gdl $i $i [eval list [list $_group] $data]]
$_ged refresh_off
catch {$_archer attr set _GLOBAL $_attr_name $gdl}
$_ged refresh_on
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
------------------------------------------------------------------------------
Nokia and AT&T present the 2010 Calling All Innovators-North America contest
Create new apps & games for the Nokia N8 for consumers in U.S. and Canada
$10 million total in prizes - $4M cash, 500 devices, nearly $6M in marketing
Develop with Nokia Qt SDK, Web Runtime, or Java and Publish to Ovi Store
http://p.sf.net/sfu/nokia-dev2dev
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
