*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Fri, 06 Sep 2002 23:24:55 +0200
changeset 2612 be0f78b12b4a
parent 2611 9108c4aa2b99
child 2613 99a6b8d8e333
*** empty log message ***
Scroller.st
--- a/Scroller.st	Fri Sep 06 23:19:59 2002 +0200
+++ b/Scroller.st	Fri Sep 06 23:24:55 2002 +0200
@@ -392,7 +392,7 @@
     DefaultTallyMarks ~~ 0 ifTrue:[
         DefaultTallyLevel := StyleSheet at:#'scroller.tallyLevel' default:1.
         DefaultTallyInset := StyleSheet at:#'scroller.tallyInset' default:0.
-        DefaultTallyDistance := StyleSheet at:#'scroller.tallyDistance' default:0.
+        DefaultTallyDistance := StyleSheet at:#'scroller.tallyDistance'.
     ].
     DefaultLevel := StyleSheet at:#'scroller.level' default:0.
     DefaultBorderWidth := StyleSheet at:#'scroller.borderWidth' default:(StyleSheet at:#'borderWidth').
@@ -2609,5 +2609,5 @@
 !Scroller class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.162 2002-09-06 20:51:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.163 2002-09-06 21:24:55 cg Exp $'
 ! !