Mercurial Mercurial > hg > stx-libwidg / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
border handling
authorClaus Gittinger <cg@exept.de>
Sat, 24 Oct 2009 16:00:20 +0200
changeset 4026 5ce3a000960c
parent 4025 9bab54a59ebe
child 4027 64bdced2a155
border handling
ScrollBar.st file | annotate | diff | comparison | revisions 
--- a/ScrollBar.st	Sat Oct 24 15:43:51 2009 +0200
+++ b/ScrollBar.st	Sat Oct 24 16:00:20 2009 +0200
@@ -820,11 +820,11 @@
     button2 autoRepeat:true.
 
     bw := self borderWidth.
-    button1 setBorderWidth:bw.
+    button1 borderWidth:bw.
     DefaultScrollerBordered ifFalse:[
-        thumb setBorderWidth:bw.
+        thumb borderWidth:bw.
     ].
-    button2 setBorderWidth:bw.
+    button2 borderWidth:bw.
 
     style := styleSheet name.
     ((style = #iris) and:[Screen current hasGrayscales]) ifTrue:[
@@ -1186,9 +1186,9 @@
 !ScrollBar class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.87 2009-10-23 15:21:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.88 2009-10-24 14:00:20 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.87 2009-10-23 15:21:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.88 2009-10-24 14:00:20 cg Exp $'
 ! !
hg/stx-libwidg