Changeset 3305 for branches/nanovis2/gui/scripts/sidebarframe.tcl

Timestamp:

Feb 18, 2013 2:32:14 PM (11 years ago)

Author:

ldelgass

Message:

sync with trunk

Location:

branches/nanovis2

Files:

• . (modified) (1 prop)
• gui/scripts/sidebarframe.tcl (modified) (4 diffs)

branches/nanovis2/gui/scripts/sidebarframe.tcl

@@ -8 +8 @@
 # ======================================================================
 #  AUTHOR:  George Howlett, Michael McLennan, Purdue University
-#  Copyright (c) 2004-2009  Purdue Research Foundation
+#  Copyright (c) 2004-2012  HUBzero Foundation, LLC
 #
 #  See the file "license.terms" for information on usage and
@@ -51 +51 @@
     public method disable { which }
 
-    protected method _toggleTab {which}
+    protected method _toggleTab { which }
     protected method _sash {op x}
     protected method _fixLayout {args}
@@ -214 +214 @@
             Background
     }
-    pack $itk_component(tabs) -side top -expand yes -anchor e -padx {4 0} -fill y
+    pack $itk_component(tabs) -side top -expand yes -anchor e -padx {4 0} \
+        -fill y
 
     eval itk_initialize $args
@@ -573 +574 @@
         set framew $x1
     } else {
-        set framew [expr $w - $ctrlw]
+        set framew [expr $w - $ctrlw - $sashw]
     }
     place $itk_component(frame) -x 0 -y 0 -anchor nw -width $framew -height $h
     place $itk_component(sashbg) -x $x1 -y 0 -anchor nw -width $sashw -height $h
-    place $itk_component(sidebar) -x $x2 -y 0 -anchor nw -width $sbarw -height $h
+    place $itk_component(sidebar) -x $x2 -y 0 -anchor nw \
+        -width $sbarw -height $h
 }