ScrollBar.st
changeset 5419 2b1c1cf06f3b
parent 5127 fcd696f9f401
child 5541 ec84bfd1d612
--- a/ScrollBar.st	Tue Sep 08 17:53:29 2015 +0200
+++ b/ScrollBar.st	Tue Sep 22 17:05:43 2015 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -11,6 +13,8 @@
 "
 "{ Package: 'stx:libwidg' }"
 
+"{ NameSpace: Smalltalk }"
+
 SimpleView subclass:#ScrollBar
 	instanceVariableNames:'thumb button1 button2 buttonLayout elementSpacing orientation'
 	classVariableNames:'DefaultButtonPositions DefaultLevel DefaultElementSpacing
@@ -82,7 +86,7 @@
                        #'scrollBar.scrollerBordered' 
                        #'scrollBar.elementSpacing'
                        #'scrollBar.vScrollBarWidth'
-                       #'scrollBar.vScrollBarWidth' 
+                       #'scrollBar.hScrollBarHeight' 
                       )>
 
     DefaultButtonPositions := StyleSheet at:#'scrollBar.buttonPositions' default:#bottom.
@@ -1194,10 +1198,10 @@
 !ScrollBar class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.94 2014-08-18 18:28:19 stefan Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.94 2014-08-18 18:28:19 stefan Exp $'
+    ^ '$Header$'
 ! !