Changeset 4296 for trunk/gui

Timestamp:

Mar 28, 2014, 10:54:37 PM (10 years ago)

Author:

ldelgass

Message:

remove unused methods

File:

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

trunk/gui/scripts/mapviewer.tcl

@@ -83 +83 @@
     protected method MouseScroll { direction }
     protected method Pan {option x y}
-    protected method Pick {x y}
     protected method Rebuild {}
     protected method ReceiveDataset { args }
@@ -799 +798 @@
             puts stderr "Coords: $x $y $z"
         }
-        "scalar" {
-            set option [lindex $args 1]
-            switch -- $option {
-                "world" {
-                    foreach { x y z value tag } [lrange $args 2 end] break
-                }
-                "pixel" {
-                    foreach { x y value tag } [lrange $args 2 end] break
-                }
-            }
-        }
-        "vector" {
-            set option [lindex $args 1]
-            switch -- $option {
-                "world" {
-                    foreach { x y z vx vy vz tag } [lrange $args 2 end] break
-                }
-                "pixel" {
-                    foreach { x y vx vy vz tag } [lrange $args 2 end] break
-                }
-            }
-        }
         "names" {
             foreach { name } [lindex $args 1] {
-                #puts stderr "Dataset: $name"
+                #puts stderr "layer: $name"
             }
         }
@@ -1201 +1178 @@
 }
 
-itcl::body Rappture::MapViewer::Pick {x y} {
-    foreach tag [CurrentDatasets -visible] {
-        SendCmd "dataset getscalar pixel $x $y $tag"
-    } 
-}
-
 # ----------------------------------------------------------------------
 # USAGE: $this Pan click x y
@@ -1659 +1630 @@
         "polygon" {
             array set settings {
-                -color black
+                -color white
                 -minbias 1000
                 -opacity 1.0