--- a/MiniScroller.st Fri Apr 19 18:47:07 1996 +0200
+++ b/MiniScroller.st Fri Apr 19 18:50:04 1996 +0200
@@ -69,7 +69,7 @@
initialize
"initialize - setup instvars from defaults"
- orientation := #vertical.
+ orientation isNil ifTrue:[orientation := #vertical].
super initialize.
! !
@@ -97,5 +97,5 @@
!MiniScroller class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/MiniScroller.st,v 1.8 1996-04-19 16:47:07 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/MiniScroller.st,v 1.9 1996-04-19 16:49:07 ca Exp $'
! !