Changeset 3175 for branches/nanovis2/gui/scripts/htmlviewer.tcl

Timestamp:

Sep 20, 2012, 12:46:32 PM (12 years ago)

Author:

ldelgass

Message:

sync with trunk

Location:

branches/nanovis2

Files:

• . (modified) (1 prop)
• gui/scripts/htmlviewer.tcl (modified) (1 diff)

branches/nanovis2/gui/scripts/htmlviewer.tcl

@@ -304 +304 @@
         if {"" != $node} {
             set bbox [$itk_component(html) bbox $node]
-            set realht [expr {[lindex $bbox 3]-[lindex $bbox 1]}]
+            if { [llength $bbox] == 4 } {
+                set realht [expr {[lindex $bbox 3]-[lindex $bbox 1]}]
+            }
         }
         if {$itk_option(-maxlines) > 0} {