resource directive
authorClaus Gittinger <cg@exept.de>
Wed, 22 Feb 2006 16:00:13 +0100
changeset 2921 1e8c394e895e
parent 2920 82161da6adef
child 2922 1d82594044db
resource directive
ProgressIndicator.st
--- a/ProgressIndicator.st	Wed Feb 22 15:59:43 2006 +0100
+++ b/ProgressIndicator.st	Wed Feb 22 16:00:13 2006 +0100
@@ -863,12 +863,12 @@
     "initialize styleSheet values"
 
     <resource: #style (#'progressIndicator.viewBackground'
-		      #'progressIndicator.foregroundColor')>
+                       #'progressIndicator.foregroundColor')>
 
     super initStyle.
 
     self is3D ifTrue:[
-	self level:-1
+        self level:-1
     ].
 
     bgColor := styleSheet colorAt:'progressIndicator.viewBackground' default:Color white.
@@ -876,7 +876,6 @@
     fgColor := fgColor onDevice:device.
 
     showPercentage := true.
-
 !
 
 initialize
@@ -1136,5 +1135,5 @@
 !ProgressIndicator class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ProgressIndicator.st,v 1.50 2006-01-09 08:56:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ProgressIndicator.st,v 1.51 2006-02-22 15:00:13 cg Exp $'
 ! !