--- a/MiniScr.st Wed Jan 22 18:21:36 1997 +0100
+++ b/MiniScr.st Wed Jan 22 18:25:17 1997 +0100
@@ -17,7 +17,7 @@
category:'Views-Interactors'
!
-!MiniScroller class methodsFor:'documentation'!
+!MiniScroller class methodsFor:'documentation'!
copyright
"
@@ -45,6 +45,8 @@
!MiniScroller methodsFor:'initialization'!
initStyle
+ "setup viewStyle specifics"
+
|style lvl|
super initStyle.
@@ -66,7 +68,7 @@
shadowForm := lightForm := nil.
fixThumbHeight := false
- "Modified: 17.4.1996 / 13:57:20 / cg"
+ "Modified: 22.1.1997 / 11:57:30 / cg"
!
initialize
@@ -104,8 +106,8 @@
"Modified: 19.7.1996 / 20:46:21 / cg"
! !
-!MiniScroller class methodsFor:'documentation'!
+!MiniScroller class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Attic/MiniScr.st,v 1.13 1996-07-19 18:48:05 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Attic/MiniScr.st,v 1.14 1997-01-22 17:24:23 cg Exp $'
! !
--- a/MiniScroller.st Wed Jan 22 18:21:36 1997 +0100
+++ b/MiniScroller.st Wed Jan 22 18:25:17 1997 +0100
@@ -17,7 +17,7 @@
category:'Views-Interactors'
!
-!MiniScroller class methodsFor:'documentation'!
+!MiniScroller class methodsFor:'documentation'!
copyright
"
@@ -45,6 +45,8 @@
!MiniScroller methodsFor:'initialization'!
initStyle
+ "setup viewStyle specifics"
+
|style lvl|
super initStyle.
@@ -66,7 +68,7 @@
shadowForm := lightForm := nil.
fixThumbHeight := false
- "Modified: 17.4.1996 / 13:57:20 / cg"
+ "Modified: 22.1.1997 / 11:57:30 / cg"
!
initialize
@@ -104,8 +106,8 @@
"Modified: 19.7.1996 / 20:46:21 / cg"
! !
-!MiniScroller class methodsFor:'documentation'!
+!MiniScroller class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/MiniScroller.st,v 1.13 1996-07-19 18:48:05 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/MiniScroller.st,v 1.14 1997-01-22 17:24:23 cg Exp $'
! !
--- a/ScrollBar.st Wed Jan 22 18:21:36 1997 +0100
+++ b/ScrollBar.st Wed Jan 22 18:25:17 1997 +0100
@@ -477,13 +477,17 @@
!
initStyle
+ "setup viewStyle specifics"
+
super initStyle.
buttonLayout := DefaultButtonPositions.
DefaultLevel notNil ifTrue:[
- self level:DefaultLevel
+ self level:DefaultLevel
].
elementSpacing := DefaultElementSpacing
+
+ "Modified: 22.1.1997 / 11:57:41 / cg"
!
initialize
@@ -705,5 +709,5 @@
!ScrollBar class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.39 1996-11-06 17:34:09 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.40 1997-01-22 17:24:48 cg Exp $'
! !
--- a/SelListV.st Wed Jan 22 18:21:36 1997 +0100
+++ b/SelListV.st Wed Jan 22 18:25:17 1997 +0100
@@ -2085,6 +2085,8 @@
!
initStyle
+ "setup viewStyle specifics"
+
|nm|
super initStyle.
@@ -2175,7 +2177,7 @@
halfIntensityFgColor := Color darkGray.
].
- "Modified: 14.1.1997 / 00:13:41 / cg"
+ "Modified: 22.1.1997 / 11:57:47 / cg"
!
initialize
@@ -3100,5 +3102,5 @@
!SelectionInListView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Attic/SelListV.st,v 1.86 1997-01-22 03:25:30 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Attic/SelListV.st,v 1.87 1997-01-22 17:25:17 cg Exp $'
! !
--- a/SelectionInListView.st Wed Jan 22 18:21:36 1997 +0100
+++ b/SelectionInListView.st Wed Jan 22 18:25:17 1997 +0100
@@ -2085,6 +2085,8 @@
!
initStyle
+ "setup viewStyle specifics"
+
|nm|
super initStyle.
@@ -2175,7 +2177,7 @@
halfIntensityFgColor := Color darkGray.
].
- "Modified: 14.1.1997 / 00:13:41 / cg"
+ "Modified: 22.1.1997 / 11:57:47 / cg"
!
initialize
@@ -3100,5 +3102,5 @@
!SelectionInListView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.86 1997-01-22 03:25:30 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.87 1997-01-22 17:25:17 cg Exp $'
! !