Changeset 5647 for trunk

Timestamp:

May 31, 2015, 8:48:52 PM (9 years ago)

Author:

ldelgass

Message:

code style

Location:

trunk/gui/scripts

Files:

• map.tcl (modified) (2 diffs)
• mapviewer.tcl (modified) (4 diffs)

trunk/gui/scripts/map.tcl

@@ -23 +23 @@
 
 itcl::class Rappture::Map {
+    constructor {xmlobj path} {
+        # defined below
+    }
+    destructor {
+        # defined below
+    }
+
+    public method earthfile {}
+    public method hints { args }
+    public method isGeocentric {}
+    public method isvalid {} {
+        return $_isValid;
+    }
+    public method layer { layerName }
+    public method layers {}
+    public method type { layerName }
+    public method viewpoint { viewpointName }
+    public method viewpoints {}
+
+    protected method Parse { xmlobj path }
+
     private variable _tree "";         # Tree of information about the map.
     private variable _isValid 0;
@@ -44 +65 @@
         "projected"     1
     }
-    protected method Parse { xmlobj path }
-
-    constructor {xmlobj path} {
-        # defined below
-    }
-    destructor {
-        # defined below
-    }
-
-    public method earthfile {}
-    public method hints { args }
-    public method isGeocentric {}
-    public method isvalid {} {
-        return $_isValid;
-    }
-    public method layer { layerName }
-    public method layers {}
-    public method type { layerName }
-    public method viewpoint { viewpointName }
-    public method viewpoints {}
 }
 

trunk/gui/scripts/mapviewer.tcl

@@ -38 +38 @@
     itk_option define -plotforeground plotForeground Foreground ""
     itk_option define -plotbackground plotBackground Background ""
-
-    private variable _layersFrame "";     # Name of layers frame widget
-    private variable _viewpointsFrame ""; # Name of viewpoints frame widget
-    private variable _mapsettings;        # Global map settings
 
     constructor { hostlist args } {
@@ -132 +128 @@
     private method Zoom {option {x 0} {y 0}}
 
+    private variable _layersFrame "";     # Name of layers frame widget
+    private variable _viewpointsFrame ""; # Name of viewpoints frame widget
+    private variable _mapsettings;        # Global map settings
+
     private variable _dlist "";         # list of data objects
     private variable _obj2ovride;       # maps dataobj => style override
@@ -155 +155 @@
     private variable _title ""
 
-    private common _downloadPopup;      # download options from popup
-    private common _hardcopy
     private variable _width 0
     private variable _height 0
@@ -164 +162 @@
     private variable _labelCount 0
     private variable _b1mode "pan"
+
+    private common _downloadPopup;      # download options from popup
+    private common _hardcopy
 }