Changeset 5947 for trunk/gui/scripts/map.tcl

Timestamp:

Dec 15, 2015 12:33:23 PM (8 years ago)

Author:

ldelgass

Message:

catch errors from missing tree nodes

File:

• trunk/gui/scripts/map.tcl (modified) (2 diffs)

trunk/gui/scripts/map.tcl

@@ -638 +638 @@
 itcl::body Rappture::Map::viewpoints {} {
     set list {}
-    foreach node [$_tree children root->"viewpoints"] {
-        lappend list [$_tree label $node]
+    catch {
+        foreach node [$_tree children root->"viewpoints"] {
+            lappend list [$_tree label $node]
+        }
     }
     return $list
@@ -664 +666 @@
 itcl::body Rappture::Map::selectors { layerName } {
     set list {}
-    foreach node [$_tree children root->"layers"->"$layerName"->"selectors"] {
-        lappend list [$_tree label $node]
+    catch {
+        foreach node [$_tree children root->"layers"->"$layerName"->"selectors"] {
+            lappend list [$_tree label $node]
+        }
     }
     return $list