Changeset 6257 for trunk

Timestamp:

Apr 7, 2016, 12:52:01 PM (8 years ago)

Author:

ldelgass

Message:

Refactor: make enable a subcommand of placard method.

File:

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

trunk/gui/scripts/mapviewer.tcl

@@ -55 +55 @@
     public method disconnect {}
     public method download {option args}
-    public method enablePlacard {state layerName}
+    public method placard {option args}
     public method get {args}
     public method isconnected {}
@@ -990 +990 @@
 
 # ----------------------------------------------------------------------
-# USAGE: enablePlacard <state> <layerName>
+# USAGE: placard enable <state> <layerName>
 # 
 # Clients use this method to enable/disable display of a feature placard
 # when a feature is clicked/selected.
 # ----------------------------------------------------------------------
-itcl::body Rappture::MapViewer::enablePlacard {state layerName} {
-    if {![info exists _layers($layerName)]} {
-        error "Unknown layer \"$layerName\""
-    }
-    if {![string is boolean $state]} {
-        error "argument to enablePlacard must be boolean"
-    }
-    SendCmd "placard enable $state $layerName"
+itcl::body Rappture::MapViewer::placard {option args} {
+    switch $option {
+        enable {
+            if {[llength $args] != 2} {
+                error "wrong $ args: should be \"enable <boolean> <layerName>\""
+            }
+            set state [lindex $args 0]
+            set layerName [lindex $args 1]
+            if {![info exists _layers($layerName)]} {
+                error "Unknown layer \"$layerName\""
+            }
+            if {![string is boolean $state]} {
+                error "argument to placard enable must be boolean"
+            }
+            SendCmd "placard enable $state $layerName"
+        }
+        default {
+            error "bad option \"$option\": should be enable"
+        }
+    }
 }