Changeset 1929 for trunk/gui/scripts/animicon.tcl

Timestamp:

Oct 22, 2010 4:06:10 PM (14 years ago)

Author:

gah

Message:

 

File:

• trunk/gui/scripts/animicon.tcl (modified) (6 diffs)

trunk/gui/scripts/animicon.tcl

@@ -45 +45 @@
 itcl::body Rappture::Animicon::constructor {args} {
     itk_component add icon {
-        label $itk_interior.icon
+        label $itk_interior.icon
     }
     pack $itk_component(icon) -expand yes -fill both
@@ -61 +61 @@
 itcl::body Rappture::Animicon::start {} {
     if {![isrunning]} {
-        _next
+        _next
     }
 }
@@ -74 +74 @@
 itcl::body Rappture::Animicon::stop {} {
     if {[isrunning]} {
-        after cancel $_afterid
-        set _afterid ""
+        after cancel $_afterid
+        set _afterid ""
     }
 }
@@ -97 +97 @@
     $itk_component(icon) configure -image $_frames($_pos)
     if {[incr _pos] >= [array size _frames]} {
-        set _pos 0
+        set _pos 0
     }
     set _afterid [after $itk_option(-delay) [itcl::code $this _next]]
@@ -113 +113 @@
     catch {unset _frames}
     if {[llength $itk_option(-images)] >= 1} {
-        set w 0
-        set h 0
-        set i 0
-        foreach name $itk_option(-images) {
-            set imh [Rappture::icon $name]
-            if {"" == $imh} {
-                error "image not found: $name"
-            }
-            set _frames($i) $imh
-            if {[image width $imh] > $w} { set w [image width $imh] }
-            if {[image height $imh] > $h} { set h [image height $imh] }
-            incr i
-        }
+        set w 0
+        set h 0
+        set i 0
+        foreach name $itk_option(-images) {
+            set imh [Rappture::icon $name]
+            if {"" == $imh} {
+                error "image not found: $name"
+            }
+            set _frames($i) $imh
+            if {[image width $imh] > $w} { set w [image width $imh] }
+            if {[image height $imh] > $h} { set h [image height $imh] }
+            incr i
+        }
     }
 
@@ -132 +132 @@
 
     if {$restart} {
-        start
+        start
     }
 }