Revision: 73146
http://sourceforge.net/p/brlcad/code/73146
Author: brlcad
Date: 2019-05-23 06:40:13 +0000 (Thu, 23 May 2019)
Log Message:
-----------
seems silly to remove every entry one at a time, just kill it and recreate the
group
Modified Paths:
--------------
brlcad/trunk/src/tclscripts/util/regionstobots.tcl
Modified: brlcad/trunk/src/tclscripts/util/regionstobots.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/util/regionstobots.tcl 2019-05-23 06:34:06 UTC
(rev 73145)
+++ brlcad/trunk/src/tclscripts/util/regionstobots.tcl 2019-05-23 06:40:13 UTC
(rev 73146)
@@ -17,6 +17,7 @@
# License along with this file; see the file named COPYING for more
# information.
#
+
proc regions_to_bots {} {
set old_globcompat $::glob_compat_mode
set glob_compat_mode 0
@@ -28,12 +29,9 @@
}
set have_bot [exists $region.bot]
if { $have_bot } {
- puts "facetized $region to $region.bot"
- set region_tree [search $region -depth 1]
- foreach item $region_tree {
- rm $region $item
- }
- g $region $region.bot
+ puts "facetized $region to $region.bot"
+ kill $region
+ g $region $region.bot
}
}
set ::glob_compat_mode $old_globcompat
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
