Changeset 5892 for trunk/gui

Timestamp:

Sep 29, 2015, 3:41:43 PM (9 years ago)

Author:

ldelgass

Message:

add select notification handler

File:

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

trunk/gui/scripts/mapviewer.tcl

@@ -61 +61 @@
     }
     public method scale {args}
+    public method select {option {args ""}}
 
     private method KeyPress { key }
@@ -213 +214 @@
     $_parser alias camera   [itcl::code $this camera]
     $_parser alias screen   [itcl::code $this ReceiveScreenInfo]
+    $_parser alias select   [itcl::code $this select]
 
     # Millisecond delay before animated wait dialog appears
@@ -870 +872 @@
             # TODO: Enable controls like vertical scale that only have
             # an effect when terrain is present
+        }
+    }
+}
+
+# ----------------------------------------------------------------------
+# USAGE: select clear
+# USAGE: select feature
+# USAGE: select annotation
+# ----------------------------------------------------------------------
+itcl::body Rappture::MapViewer::select {option {args ""}} {
+    DebugTrace "Enter"
+    switch $option {
+        "annotation" {
+            puts stderr "select annotation $args"
+        }
+        "clear" {
+             puts stderr "select clear"
+        }
+        "feature" {
+             puts stderr "select feature $args"
         }
     }