Changeset 6093 for trunk

Timestamp:

Mar 3, 2016 6:25:00 PM (8 years ago)

Author:

ldelgass

Message:

fix error msgs

File:

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

trunk/gui/scripts/map.tcl

@@ -161 +161 @@
         set layerType [$layers get $layer.type]
         if { ![info exists _layerTypes($layerType)] } {
-            puts stderr "ERROR: invalid layer type \"$layerType\": should be one of [array names _layerTypes]"
+            puts stderr "ERROR: invalid layer type \"$layerType\": should be one of [join [array names _layerTypes] {, }]"
             continue
         }
@@ -436 +436 @@
     }
     if { ![info exists _mapTypes($mapType)] } {
-        puts stderr "ERROR: unknown map type \"$mapType\": should be one of [array names _mapTypes]"
+        puts stderr "ERROR: unknown map type \"$mapType\": should be one of [join [array names _mapTypes] {, }]"
         set mapType "projected"
     }
@@ -468 +468 @@
 itcl::body Rappture::Map::setType { type } {
     if { ![info exists _mapTypes($type)] } {
-        error "unknown map type \"$type\": should be one of [array names _mapTypes]"
+        error "unknown map type \"$type\": should be one of [join [array names _mapTypes] {, }]"
     }
     $_tree set root "type" $type