Changeset 6012 for trunk

Timestamp:

Feb 15, 2016 11:14:50 AM (8 years ago)

Author:

ldelgass

Message:

Remove unused legend component

File:

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

trunk/gui/scripts/mapviewer.tcl

@@ -275 +275 @@
         grid                   0
         grid-type              "shader"
-        legend                 1
         terrain-ambient        0.03
         terrain-edges          0
@@ -351 +350 @@
     BuildCameraTab
     BuildHelpTab
-
-    # Legend
-
-    set _image(legend) [image create photo]
-    itk_component add legend {
-        canvas $itk_component(plotarea).legend -width 50 -highlightthickness 0
-    } {
-        usual
-        ignore -highlightthickness
-        rename -background -plotbackground plotBackground Background
-    }
 
     # Hack around the Tk panewindow.  The problem is that the requested
@@ -1107 +1095 @@
     if { [IsConnected] } {
         set bytes [ReceiveBytes $size]
-        if { ![info exists _image(legend)] } {
+        if { ![info exists _image(legend-$colormap)] } {
             set _image(legend-$colormap) [image create photo]
         }