uff - version methods changed to return stings
authorClaus Gittinger <cg@exept.de>
Sat, 11 Nov 1995 17:23:54 +0100
changeset 174 d80a6cc3f9b2
parent 173 67654ab0d85b
child 175 bb91e76dae76
uff - version methods changed to return stings
ArrButton.st
ArrowButton.st
Button.st
ButtonC.st
ButtonController.st
ChckTggle.st
CheckToggle.st
ClckMenuV.st
ClickMenuView.st
CodeView.st
DialogBox.st
EFGroup.st
ETxtView.st
EditField.st
EditTextView.st
EnterBox.st
EnterBox2.st
EnterFieldGroup.st
FSaveBox.st
FSelBox.st
FSelList.st
FileSaveBox.st
FileSelectionBox.st
FileSelectionList.st
FontPanel.st
FramedBox.st
HMiniScr.st
HPanelV.st
HScrBar.st
HScroller.st
HVScrView.st
HVScrollableView.st
HorizontalMiniScroller.st
HorizontalPanelView.st
HorizontalScrollBar.st
HorizontalScroller.st
InfoBox.st
LSelBox.st
Label.st
ListSelectionBox.st
ListView.st
ListViewC.st
ListViewController.st
MSelList.st
MenuView.st
MiniScr.st
MiniScroller.st
MultiSelectionInList.st
ObjView.st
ObjectView.st
OptBox.st
OptionBox.st
PanelView.st
PopUpList.st
PopUpListController.st
PopUpLstC.st
PopUpMenu.st
PullDMenu.st
PullDownMenu.st
RButtC.st
RButtGrp.st
RButton.st
RadioButton.st
RadioButtonController.st
RadioButtonGroup.st
ScrView.st
ScrollBar.st
ScrollableView.st
Scroller.st
SelList.st
SelListV.st
SelectionInList.st
SelectionInListView.st
TextColl.st
TextCollector.st
TextView.st
Toggle.st
ToggleC.st
ToggleController.st
VPanelV.st
VarHPanel.st
VarHPanelC.st
VarPanelC.st
VarVPanel.st
VarVPanelC.st
VariableHorizontalPanel.st
VariableHorizontalPanelController.st
VariablePanelController.st
VariableVerticalPanel.st
VariableVerticalPanelController.st
VerticalPanelView.st
WarnBox.st
WarningBox.st
Workspace.st
YesNoBox.st
--- a/ArrButton.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ArrButton.st	Sat Nov 11 17:23:54 1995 +0100
@@ -26,13 +26,6 @@
 	 category:'Views-Interactors'
 !
 
-ArrowButton comment:'
-COPYRIGHT (c) 1993 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/ArrButton.st,v 1.17 1995-09-07 12:44:14 claus Exp $
-'!
-
 !ArrowButton class methodsFor:'documentation'!
 
 copyright
@@ -50,9 +43,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/ArrButton.st,v 1.17 1995-09-07 12:44:14 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ArrButton.st,v 1.18 1995-11-11 16:18:56 cg Exp $'
 !
 
 documentation
--- a/ArrowButton.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ArrowButton.st	Sat Nov 11 17:23:54 1995 +0100
@@ -26,13 +26,6 @@
 	 category:'Views-Interactors'
 !
 
-ArrowButton comment:'
-COPYRIGHT (c) 1993 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/ArrowButton.st,v 1.17 1995-09-07 12:44:14 claus Exp $
-'!
-
 !ArrowButton class methodsFor:'documentation'!
 
 copyright
@@ -50,9 +43,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/ArrowButton.st,v 1.17 1995-09-07 12:44:14 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/ArrowButton.st,v 1.18 1995-11-11 16:18:56 cg Exp $'
 !
 
 documentation
--- a/Button.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/Button.st	Sat Nov 11 17:23:54 1995 +0100
@@ -35,13 +35,6 @@
        category:'Views-Interactors'
 !
 
-Button comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Button.st,v 1.33 1995-10-23 20:06:00 cg Exp $
-'!
-
 !Button class methodsFor:'documentation'!
 
 copyright
@@ -59,9 +52,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Button.st,v 1.33 1995-10-23 20:06:00 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.34 1995-11-11 16:19:05 cg Exp $'
 !
 
 documentation
--- a/ButtonC.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ButtonC.st	Sat Nov 11 17:23:54 1995 +0100
@@ -39,9 +39,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/ButtonC.st,v 1.19 1995-09-18 10:38:03 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ButtonC.st,v 1.20 1995-11-11 16:19:14 cg Exp $'
 !
 
 documentation
--- a/ButtonController.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ButtonController.st	Sat Nov 11 17:23:54 1995 +0100
@@ -39,9 +39,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.19 1995-09-18 10:38:03 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.20 1995-11-11 16:19:14 cg Exp $'
 !
 
 documentation
--- a/ChckTggle.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ChckTggle.st	Sat Nov 11 17:23:54 1995 +0100
@@ -22,13 +22,6 @@
 	 category:'Views-Interactors'
 !
 
-CheckToggle comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/ChckTggle.st,v 1.18 1995-10-23 20:06:03 cg Exp $
-'!
-
 !CheckToggle class methodsFor:'documentation'!
 
 copyright
@@ -46,9 +39,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/ChckTggle.st,v 1.18 1995-10-23 20:06:03 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ChckTggle.st,v 1.19 1995-11-11 16:19:17 cg Exp $'
 !
 
 documentation
--- a/CheckToggle.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/CheckToggle.st	Sat Nov 11 17:23:54 1995 +0100
@@ -22,13 +22,6 @@
 	 category:'Views-Interactors'
 !
 
-CheckToggle comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/CheckToggle.st,v 1.18 1995-10-23 20:06:03 cg Exp $
-'!
-
 !CheckToggle class methodsFor:'documentation'!
 
 copyright
@@ -46,9 +39,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/CheckToggle.st,v 1.18 1995-10-23 20:06:03 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/CheckToggle.st,v 1.19 1995-11-11 16:19:17 cg Exp $'
 !
 
 documentation
--- a/ClckMenuV.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ClckMenuV.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-Menus'
 !
 
-ClickMenuView comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/ClckMenuV.st,v 1.5 1995-05-12 18:23:44 claus Exp $
-'!
-
 !ClickMenuView class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/ClckMenuV.st,v 1.5 1995-05-12 18:23:44 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ClckMenuV.st,v 1.6 1995-11-11 16:19:18 cg Exp $'
 !
 
 documentation
--- a/ClickMenuView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ClickMenuView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-Menus'
 !
 
-ClickMenuView comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/ClickMenuView.st,v 1.5 1995-05-12 18:23:44 claus Exp $
-'!
-
 !ClickMenuView class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/ClickMenuView.st,v 1.5 1995-05-12 18:23:44 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/ClickMenuView.st,v 1.6 1995-11-11 16:19:18 cg Exp $'
 !
 
 documentation
--- a/CodeView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/CodeView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Interface-Workspace'
 !
 
-CodeView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	    All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/CodeView.st,v 1.20 1995-08-08 01:06:44 claus Exp $
-'!
-
 !CodeView class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/CodeView.st,v 1.20 1995-08-08 01:06:44 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/CodeView.st,v 1.21 1995-11-11 16:19:21 cg Exp $'
 !
 
 documentation
--- a/DialogBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/DialogBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -24,9 +24,7 @@
 !DialogBox class methodsFor:'documentation'!
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.24 1995-10-23 20:06:06 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.25 1995-11-11 16:19:27 cg Exp $'
 !
 
 documentation
--- a/EFGroup.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/EFGroup.st	Sat Nov 11 17:23:54 1995 +0100
@@ -18,13 +18,6 @@
 	 category:'Interface-Support'
 !
 
-EnterFieldGroup comment:'
-COPYRIGHT (c) 1992 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/EFGroup.st,v 1.12 1995-06-06 04:12:53 claus Exp $
-'!
-
 !EnterFieldGroup class methodsFor:'documentation'!
 
 copyright
@@ -42,9 +35,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/EFGroup.st,v 1.12 1995-06-06 04:12:53 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/EFGroup.st,v 1.13 1995-11-11 16:19:33 cg Exp $'
 !
 
 documentation
--- a/ETxtView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ETxtView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -24,13 +24,6 @@
 	 category:'Views-Text'
 !
 
-EditTextView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	    All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/ETxtView.st,v 1.35 1995-09-14 17:43:30 claus Exp $
-'!
-
 !EditTextView class methodsFor:'documentation'!
 
 copyright
@@ -48,9 +41,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/ETxtView.st,v 1.35 1995-09-14 17:43:30 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ETxtView.st,v 1.36 1995-11-11 16:19:47 cg Exp $'
 !
 
 documentation
--- a/EditField.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/EditField.st	Sat Nov 11 17:23:54 1995 +0100
@@ -23,13 +23,6 @@
 	 category:'Views-Text'
 !
 
-EditField comment:'
-COPYRIGHT (c) 1990 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.29 1995-09-21 11:53:48 claus Exp $
-'!
-
 !EditField class methodsFor:'documentation'!
 
 copyright
@@ -47,9 +40,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.29 1995-09-21 11:53:48 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.30 1995-11-11 16:20:04 cg Exp $'
 !
 
 documentation
--- a/EditTextView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/EditTextView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -24,13 +24,6 @@
 	 category:'Views-Text'
 !
 
-EditTextView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	    All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.35 1995-09-14 17:43:30 claus Exp $
-'!
-
 !EditTextView class methodsFor:'documentation'!
 
 copyright
@@ -48,9 +41,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.35 1995-09-14 17:43:30 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.36 1995-11-11 16:19:47 cg Exp $'
 !
 
 documentation
--- a/EnterBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/EnterBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -36,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/EnterBox.st,v 1.30 1995-09-07 12:44:49 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox.st,v 1.31 1995-11-11 16:20:10 cg Exp $'
 !
 
 documentation
--- a/EnterBox2.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/EnterBox2.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-DialogBoxes'
 !
 
-EnterBox2 comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/EnterBox2.st,v 1.11 1995-03-06 19:28:35 claus Exp $
-'!
-
 !EnterBox2 class methodsFor:'documentation '!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/EnterBox2.st,v 1.11 1995-03-06 19:28:35 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox2.st,v 1.12 1995-11-11 16:20:13 cg Exp $'
 !
 
 documentation
--- a/EnterFieldGroup.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/EnterFieldGroup.st	Sat Nov 11 17:23:54 1995 +0100
@@ -18,13 +18,6 @@
 	 category:'Interface-Support'
 !
 
-EnterFieldGroup comment:'
-COPYRIGHT (c) 1992 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/EnterFieldGroup.st,v 1.12 1995-06-06 04:12:53 claus Exp $
-'!
-
 !EnterFieldGroup class methodsFor:'documentation'!
 
 copyright
@@ -42,9 +35,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/EnterFieldGroup.st,v 1.12 1995-06-06 04:12:53 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/EnterFieldGroup.st,v 1.13 1995-11-11 16:19:33 cg Exp $'
 !
 
 documentation
--- a/FSaveBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/FSaveBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
 	 category:'Views-DialogBoxes'
 !
 
-FileSaveBox comment:'
-COPYRIGHT (c) 1994 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/FSaveBox.st,v 1.5 1995-08-29 16:43:47 claus Exp $
-'!
-
 !FileSaveBox class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/FSaveBox.st,v 1.5 1995-08-29 16:43:47 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/FSaveBox.st,v 1.6 1995-11-11 16:20:14 cg Exp $'
 !
 
 documentation
--- a/FSelBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/FSelBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-DialogBoxes'
 !
 
-FileSelectionBox comment:'
-COPYRIGHT (c) 1990 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/FSelBox.st,v 1.21 1995-10-24 17:22:41 cg Exp $
-'!
-
 !FileSelectionBox class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/FSelBox.st,v 1.21 1995-10-24 17:22:41 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/FSelBox.st,v 1.22 1995-11-11 16:20:16 cg Exp $'
 !
 
 documentation
--- a/FSelList.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/FSelList.st	Sat Nov 11 17:23:54 1995 +0100
@@ -21,13 +21,6 @@
 	 category:'Views-Text'
 !
 
-FileSelectionList comment:'
-COPYRIGHT (c) 1993 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/FSelList.st,v 1.14 1995-06-27 02:22:57 claus Exp $
-'!
-
 !FileSelectionList class methodsFor:'documentation'!
 
 copyright
@@ -45,9 +38,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/FSelList.st,v 1.14 1995-06-27 02:22:57 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/FSelList.st,v 1.15 1995-11-11 16:20:20 cg Exp $'
 !
 
 documentation
--- a/FileSaveBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/FileSaveBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
 	 category:'Views-DialogBoxes'
 !
 
-FileSaveBox comment:'
-COPYRIGHT (c) 1994 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/FileSaveBox.st,v 1.5 1995-08-29 16:43:47 claus Exp $
-'!
-
 !FileSaveBox class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/FileSaveBox.st,v 1.5 1995-08-29 16:43:47 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/FileSaveBox.st,v 1.6 1995-11-11 16:20:14 cg Exp $'
 !
 
 documentation
--- a/FileSelectionBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/FileSelectionBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-DialogBoxes'
 !
 
-FileSelectionBox comment:'
-COPYRIGHT (c) 1990 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.21 1995-10-24 17:22:41 cg Exp $
-'!
-
 !FileSelectionBox class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.21 1995-10-24 17:22:41 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.22 1995-11-11 16:20:16 cg Exp $'
 !
 
 documentation
--- a/FileSelectionList.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/FileSelectionList.st	Sat Nov 11 17:23:54 1995 +0100
@@ -21,13 +21,6 @@
 	 category:'Views-Text'
 !
 
-FileSelectionList comment:'
-COPYRIGHT (c) 1993 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/FileSelectionList.st,v 1.14 1995-06-27 02:22:57 claus Exp $
-'!
-
 !FileSelectionList class methodsFor:'documentation'!
 
 copyright
@@ -45,9 +38,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/FileSelectionList.st,v 1.14 1995-06-27 02:22:57 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionList.st,v 1.15 1995-11-11 16:20:20 cg Exp $'
 !
 
 documentation
--- a/FontPanel.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/FontPanel.st	Sat Nov 11 17:23:54 1995 +0100
@@ -26,9 +26,7 @@
 !FontPanel class methodsFor:'documentation'!
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.13 1995-08-29 16:43:55 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.14 1995-11-11 16:20:24 cg Exp $'
 !
 
 documentation
--- a/FramedBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/FramedBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -20,13 +20,6 @@
 	 category:'Views-Layout'
 !
 
-FramedBox comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.15 1995-09-07 12:44:58 claus Exp $
-'!
-
 !FramedBox class methodsFor:'documentation'!
 
 copyright
@@ -44,9 +37,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.15 1995-09-07 12:44:58 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.16 1995-11-11 16:20:28 cg Exp $'
 !
 
 documentation
--- a/HMiniScr.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/HMiniScr.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
 	 category:'Views-Interactors'
 !
 
-HorizontalMiniScroller comment:'
-COPYRIGHT (c) 1994 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/HMiniScr.st,v 1.4 1995-06-06 04:13:41 claus Exp $
-'!
-
 !HorizontalMiniScroller class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/HMiniScr.st,v 1.4 1995-06-06 04:13:41 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/HMiniScr.st,v 1.5 1995-11-11 16:20:30 cg Exp $'
 !
 
 documentation
--- a/HPanelV.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/HPanelV.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-Layout'
 !
 
-HorizontalPanelView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/HPanelV.st,v 1.16 1995-09-18 10:38:31 claus Exp $
-'!
-
 !HorizontalPanelView class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/HPanelV.st,v 1.16 1995-09-18 10:38:31 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/HPanelV.st,v 1.17 1995-11-11 16:20:33 cg Exp $'
 !
 
 documentation
--- a/HScrBar.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/HScrBar.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-Interactors'
 !
 
-HorizontalScrollBar comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/HScrBar.st,v 1.14 1995-06-06 04:13:50 claus Exp $
-'!
-
 !HorizontalScrollBar class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/HScrBar.st,v 1.14 1995-06-06 04:13:50 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/HScrBar.st,v 1.15 1995-11-11 16:20:38 cg Exp $'
 !
 
 documentation
--- a/HScroller.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/HScroller.st	Sat Nov 11 17:23:54 1995 +0100
@@ -43,9 +43,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/HScroller.st,v 1.10 1995-08-29 16:44:02 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/HScroller.st,v 1.11 1995-11-11 16:20:41 cg Exp $'
 ! !
 
 !HorizontalScroller methodsFor:'initialization'!
--- a/HVScrView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/HVScrView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,15 +17,6 @@
        category:'Views-Basic'
 !
 
-HVScrollableView comment:'
-
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/HVScrView.st,v 1.12 1995-09-12 10:48:52 claus Exp $
-written jan 91 by claus
-'!
-
 !HVScrollableView class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/HVScrView.st,v 1.12 1995-09-12 10:48:52 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/HVScrView.st,v 1.13 1995-11-11 16:20:43 cg Exp $'
 !
 
 documentation
--- a/HVScrollableView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/HVScrollableView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,15 +17,6 @@
        category:'Views-Basic'
 !
 
-HVScrollableView comment:'
-
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/HVScrollableView.st,v 1.12 1995-09-12 10:48:52 claus Exp $
-written jan 91 by claus
-'!
-
 !HVScrollableView class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/HVScrollableView.st,v 1.12 1995-09-12 10:48:52 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/HVScrollableView.st,v 1.13 1995-11-11 16:20:43 cg Exp $'
 !
 
 documentation
--- a/HorizontalMiniScroller.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/HorizontalMiniScroller.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
 	 category:'Views-Interactors'
 !
 
-HorizontalMiniScroller comment:'
-COPYRIGHT (c) 1994 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/HorizontalMiniScroller.st,v 1.4 1995-06-06 04:13:41 claus Exp $
-'!
-
 !HorizontalMiniScroller class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/HorizontalMiniScroller.st,v 1.4 1995-06-06 04:13:41 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/HorizontalMiniScroller.st,v 1.5 1995-11-11 16:20:30 cg Exp $'
 !
 
 documentation
--- a/HorizontalPanelView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/HorizontalPanelView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-Layout'
 !
 
-HorizontalPanelView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/HorizontalPanelView.st,v 1.16 1995-09-18 10:38:31 claus Exp $
-'!
-
 !HorizontalPanelView class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/HorizontalPanelView.st,v 1.16 1995-09-18 10:38:31 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/HorizontalPanelView.st,v 1.17 1995-11-11 16:20:33 cg Exp $'
 !
 
 documentation
--- a/HorizontalScrollBar.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/HorizontalScrollBar.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-Interactors'
 !
 
-HorizontalScrollBar comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/HorizontalScrollBar.st,v 1.14 1995-06-06 04:13:50 claus Exp $
-'!
-
 !HorizontalScrollBar class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/HorizontalScrollBar.st,v 1.14 1995-06-06 04:13:50 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/HorizontalScrollBar.st,v 1.15 1995-11-11 16:20:38 cg Exp $'
 !
 
 documentation
--- a/HorizontalScroller.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/HorizontalScroller.st	Sat Nov 11 17:23:54 1995 +0100
@@ -43,9 +43,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/HorizontalScroller.st,v 1.10 1995-08-29 16:44:02 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/HorizontalScroller.st,v 1.11 1995-11-11 16:20:41 cg Exp $'
 ! !
 
 !HorizontalScroller methodsFor:'initialization'!
--- a/InfoBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/InfoBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -24,9 +24,7 @@
 !InfoBox class methodsFor:'documentation'!
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/InfoBox.st,v 1.16 1995-06-06 04:14:05 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/InfoBox.st,v 1.17 1995-11-11 16:20:46 cg Exp $'
 !
 
 documentation
--- a/LSelBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/LSelBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-DialogBoxes'
 !
 
-ListSelectionBox comment:'
-COPYRIGHT (c) 1990 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/LSelBox.st,v 1.18 1995-10-27 14:44:44 cg Exp $
-'!
-
 !ListSelectionBox class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/LSelBox.st,v 1.18 1995-10-27 14:44:44 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/LSelBox.st,v 1.19 1995-11-11 16:20:49 cg Exp $'
 !
 
 documentation
--- a/Label.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/Label.st	Sat Nov 11 17:23:54 1995 +0100
@@ -21,13 +21,6 @@
 	 category:'Views-Layout'
 !
 
-Label comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Label.st,v 1.32 1995-09-18 10:38:42 claus Exp $
-'!
-
 !Label class methodsFor:'documentation'!
 
 copyright
@@ -45,9 +38,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Label.st,v 1.32 1995-09-18 10:38:42 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.33 1995-11-11 16:20:54 cg Exp $'
 !
 
 documentation
--- a/ListSelectionBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ListSelectionBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-DialogBoxes'
 !
 
-ListSelectionBox comment:'
-COPYRIGHT (c) 1990 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/ListSelectionBox.st,v 1.18 1995-10-27 14:44:44 cg Exp $
-'!
-
 !ListSelectionBox class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/ListSelectionBox.st,v 1.18 1995-10-27 14:44:44 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/ListSelectionBox.st,v 1.19 1995-11-11 16:20:49 cg Exp $'
 !
 
 documentation
--- a/ListView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ListView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -35,13 +35,6 @@
 	 category:'Views-Text'
 !
 
-ListView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.37 1995-10-23 20:06:26 cg Exp $
-'!
-
 !ListView class methodsFor:'documentation'!
 
 copyright
@@ -59,9 +52,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.37 1995-10-23 20:06:26 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.38 1995-11-11 16:21:07 cg Exp $'
 !
 
 documentation
--- a/ListViewC.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ListViewC.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
 	 category:'Interface-Support'
 !
 
-ListViewController comment:'
-COPYRIGHT (c) 1995 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/ListViewC.st,v 1.1 1995-05-03 00:30:14 claus Exp $
-'!
-
 !ListViewController class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/ListViewC.st,v 1.1 1995-05-03 00:30:14 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ListViewC.st,v 1.2 1995-11-11 16:21:22 cg Exp $'
 !
 
 documentation
--- a/ListViewController.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ListViewController.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
 	 category:'Interface-Support'
 !
 
-ListViewController comment:'
-COPYRIGHT (c) 1995 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/ListViewController.st,v 1.1 1995-05-03 00:30:14 claus Exp $
-'!
-
 !ListViewController class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/ListViewController.st,v 1.1 1995-05-03 00:30:14 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/ListViewController.st,v 1.2 1995-11-11 16:21:22 cg Exp $'
 !
 
 documentation
--- a/MSelList.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/MSelList.st	Sat Nov 11 17:23:54 1995 +0100
@@ -1,3 +1,15 @@
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+
 'From Smalltalk/X, Version:2.10.5 on 25-mar-1995 at 12:12:09 pm'!
 
 SelectionInList subclass:#MultiSelectionInList
@@ -7,6 +19,33 @@
 	 category:'Interface-Support-Models'
 !
 
+!MultiSelectionInList class methodsFor:'documentation'!
+
+copyright
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+!
+
+version
+    ^ '$Header'
+!
+
+documentation
+"
+    Like a selectionInList, but allows for multiple selected items.
+    For use as a model for SelectionInListViews, with multipleSelectOk set to true.
+"
+! !
+
 !MultiSelectionInList methodsFor:'initialization'!
 
 initialize
--- a/MenuView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/MenuView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -28,13 +28,6 @@
        category:'Views-Menus'
 !
 
-MenuView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.33 1995-09-07 12:45:21 claus Exp $
-'!
-
 !MenuView class methodsFor:'documentation'!
 
 copyright
@@ -52,9 +45,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.33 1995-09-07 12:45:21 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.34 1995-11-11 16:21:32 cg Exp $'
 !
 
 documentation
--- a/MiniScr.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/MiniScr.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
 	 category:'Views-Interactors'
 !
 
-MiniScroller comment:'
-COPYRIGHT (c) 1994 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/MiniScr.st,v 1.4 1995-06-06 04:14:29 claus Exp $
-'!
-
 !MiniScroller class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/MiniScr.st,v 1.4 1995-06-06 04:14:29 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/MiniScr.st,v 1.5 1995-11-11 16:21:38 cg Exp $'
 !
 
 documentation
--- a/MiniScroller.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/MiniScroller.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
 	 category:'Views-Interactors'
 !
 
-MiniScroller comment:'
-COPYRIGHT (c) 1994 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/MiniScroller.st,v 1.4 1995-06-06 04:14:29 claus Exp $
-'!
-
 !MiniScroller class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/MiniScroller.st,v 1.4 1995-06-06 04:14:29 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/MiniScroller.st,v 1.5 1995-11-11 16:21:38 cg Exp $'
 !
 
 documentation
--- a/MultiSelectionInList.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/MultiSelectionInList.st	Sat Nov 11 17:23:54 1995 +0100
@@ -1,3 +1,15 @@
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+
 'From Smalltalk/X, Version:2.10.5 on 25-mar-1995 at 12:12:09 pm'!
 
 SelectionInList subclass:#MultiSelectionInList
@@ -7,6 +19,33 @@
 	 category:'Interface-Support-Models'
 !
 
+!MultiSelectionInList class methodsFor:'documentation'!
+
+copyright
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+!
+
+version
+    ^ '$Header'
+!
+
+documentation
+"
+    Like a selectionInList, but allows for multiple selected items.
+    For use as a model for SelectionInListViews, with multipleSelectOk set to true.
+"
+! !
+
 !MultiSelectionInList methodsFor:'initialization'!
 
 initialize
--- a/ObjView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ObjView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -24,11 +24,6 @@
 	 category:'Views-Basic'
 !
 
-ObjectView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	     All Rights Reserved
-'!
-
 !ObjectView class methodsFor:'documentation'!
 
 copyright
@@ -46,9 +41,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/ObjView.st,v 1.26 1995-09-07 12:45:28 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ObjView.st,v 1.27 1995-11-11 16:21:48 cg Exp $'
 !
 
 documentation
--- a/ObjectView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ObjectView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -24,11 +24,6 @@
 	 category:'Views-Basic'
 !
 
-ObjectView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	     All Rights Reserved
-'!
-
 !ObjectView class methodsFor:'documentation'!
 
 copyright
@@ -46,9 +41,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.26 1995-09-07 12:45:28 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.27 1995-11-11 16:21:48 cg Exp $'
 !
 
 documentation
--- a/OptBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/OptBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -18,13 +18,6 @@
 	 category:'Views-DialogBoxes'
 !
 
-OptionBox comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	     All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/OptBox.st,v 1.20 1995-07-23 03:02:08 claus Exp $
-'!
-
 !OptionBox class methodsFor:'documentation'!
 
 copyright
@@ -42,9 +35,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/OptBox.st,v 1.20 1995-07-23 03:02:08 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/OptBox.st,v 1.21 1995-11-11 16:21:59 cg Exp $'
 !
 
 documentation
--- a/OptionBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/OptionBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -18,13 +18,6 @@
 	 category:'Views-DialogBoxes'
 !
 
-OptionBox comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	     All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.20 1995-07-23 03:02:08 claus Exp $
-'!
-
 !OptionBox class methodsFor:'documentation'!
 
 copyright
@@ -42,9 +35,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.20 1995-07-23 03:02:08 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.21 1995-11-11 16:21:59 cg Exp $'
 !
 
 documentation
--- a/PanelView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/PanelView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -20,13 +20,6 @@
 	 category:'Views-Layout'
 !
 
-PanelView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.11 1995-08-27 00:34:32 claus Exp $
-'!
-
 !PanelView class methodsFor:'documentation'!
 
 copyright
@@ -44,9 +37,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.11 1995-08-27 00:34:32 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.12 1995-11-11 16:22:02 cg Exp $'
 !
 
 documentation
--- a/PopUpList.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/PopUpList.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
 	 category:'Views-Interactors'
 !
 
-PopUpList comment:'
-COPYRIGHT (c) 1994 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/PopUpList.st,v 1.18 1995-09-07 12:45:38 claus Exp $
-'!
-
 !PopUpList class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/PopUpList.st,v 1.18 1995-09-07 12:45:38 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpList.st,v 1.19 1995-11-11 16:22:05 cg Exp $'
 !
 
 documentation
--- a/PopUpListController.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/PopUpListController.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
 	 category:'Interface-Support-Controllers'
 !
 
-PopUpListController comment:'
-COPYRIGHT (c) 1995 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/PopUpListController.st,v 1.2 1995-09-07 12:45:41 claus Exp $
-'!
-
 !PopUpListController class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/PopUpListController.st,v 1.2 1995-09-07 12:45:41 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpListController.st,v 1.3 1995-11-11 16:22:08 cg Exp $'
 !
 
 documentation
--- a/PopUpLstC.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/PopUpLstC.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
 	 category:'Interface-Support-Controllers'
 !
 
-PopUpListController comment:'
-COPYRIGHT (c) 1995 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/PopUpLstC.st,v 1.2 1995-09-07 12:45:41 claus Exp $
-'!
-
 !PopUpListController class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/PopUpLstC.st,v 1.2 1995-09-07 12:45:41 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/PopUpLstC.st,v 1.3 1995-11-11 16:22:08 cg Exp $'
 !
 
 documentation
--- a/PopUpMenu.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/PopUpMenu.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
        category:'Views-Menus'
 !
 
-PopUpMenu comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.25 1995-09-15 23:51:37 claus Exp $
-'!
-
 !PopUpMenu class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.25 1995-09-15 23:51:37 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.26 1995-11-11 16:22:11 cg Exp $'
 !
 
 documentation
--- a/PullDMenu.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/PullDMenu.st	Sat Nov 11 17:23:54 1995 +0100
@@ -30,13 +30,6 @@
        category:'Views-Menus'
 !
 
-PullDownMenu comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	     All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/PullDMenu.st,v 1.25 1995-10-23 20:06:39 cg Exp $
-'!
-
 !PullDownMenu class methodsFor:'documentation'!
 
 copyright
@@ -54,9 +47,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/PullDMenu.st,v 1.25 1995-10-23 20:06:39 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/PullDMenu.st,v 1.26 1995-11-11 16:22:17 cg Exp $'
 !
 
 documentation
--- a/PullDownMenu.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/PullDownMenu.st	Sat Nov 11 17:23:54 1995 +0100
@@ -30,13 +30,6 @@
        category:'Views-Menus'
 !
 
-PullDownMenu comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	     All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/PullDownMenu.st,v 1.25 1995-10-23 20:06:39 cg Exp $
-'!
-
 !PullDownMenu class methodsFor:'documentation'!
 
 copyright
@@ -54,9 +47,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/PullDownMenu.st,v 1.25 1995-10-23 20:06:39 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/PullDownMenu.st,v 1.26 1995-11-11 16:22:17 cg Exp $'
 !
 
 documentation
--- a/RButtC.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/RButtC.st	Sat Nov 11 17:23:54 1995 +0100
@@ -36,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/RButtC.st,v 1.3 1995-05-17 12:25:53 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/RButtC.st,v 1.4 1995-11-11 16:22:21 cg Exp $'
 !
 
 documentation
--- a/RButtGrp.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/RButtGrp.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
 	 category:'Views-Support'
 !
 
-RadioButtonGroup comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/RButtGrp.st,v 1.15 1995-10-23 20:06:41 cg Exp $
-'!
-
 !RadioButtonGroup class methodsFor:'documentation '!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/RButtGrp.st,v 1.15 1995-10-23 20:06:41 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/RButtGrp.st,v 1.16 1995-11-11 16:22:22 cg Exp $'
 !
 
 documentation
--- a/RButton.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/RButton.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
 	 category:'Views-Interactors'
 !
 
-RadioButton comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/RButton.st,v 1.9 1995-05-03 00:37:17 claus Exp $
-'!
-
 !RadioButton class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/RButton.st,v 1.9 1995-05-03 00:37:17 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/RButton.st,v 1.10 1995-11-11 16:22:24 cg Exp $'
 !
 
 documentation
--- a/RadioButton.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/RadioButton.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
 	 category:'Views-Interactors'
 !
 
-RadioButton comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/RadioButton.st,v 1.9 1995-05-03 00:37:17 claus Exp $
-'!
-
 !RadioButton class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/RadioButton.st,v 1.9 1995-05-03 00:37:17 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/RadioButton.st,v 1.10 1995-11-11 16:22:24 cg Exp $'
 !
 
 documentation
--- a/RadioButtonController.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/RadioButtonController.st	Sat Nov 11 17:23:54 1995 +0100
@@ -36,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/RadioButtonController.st,v 1.3 1995-05-17 12:25:53 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/RadioButtonController.st,v 1.4 1995-11-11 16:22:21 cg Exp $'
 !
 
 documentation
--- a/RadioButtonGroup.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/RadioButtonGroup.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
 	 category:'Views-Support'
 !
 
-RadioButtonGroup comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/RadioButtonGroup.st,v 1.15 1995-10-23 20:06:41 cg Exp $
-'!
-
 !RadioButtonGroup class methodsFor:'documentation '!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/RadioButtonGroup.st,v 1.15 1995-10-23 20:06:41 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/RadioButtonGroup.st,v 1.16 1995-11-11 16:22:22 cg Exp $'
 !
 
 documentation
--- a/ScrView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ScrView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -18,13 +18,6 @@
        category:'Views-Basic'
 !
 
-ScrollableView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/ScrView.st,v 1.20 1995-09-09 02:31:28 claus Exp $
-'!
-
 !ScrollableView class methodsFor:'documentation'!
 
 copyright
@@ -42,9 +35,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/ScrView.st,v 1.20 1995-09-09 02:31:28 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ScrView.st,v 1.21 1995-11-11 16:22:27 cg Exp $'
 !
 
 documentation
--- a/ScrollBar.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ScrollBar.st	Sat Nov 11 17:23:54 1995 +0100
@@ -20,13 +20,6 @@
 	 category:'Views-Interactors'
 !
 
-ScrollBar comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.18 1995-08-19 15:57:03 claus Exp $
-'!
-
 !ScrollBar class methodsFor:'documentation'!
 
 copyright
@@ -44,9 +37,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.18 1995-08-19 15:57:03 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.19 1995-11-11 16:22:32 cg Exp $'
 !
 
 documentation
--- a/ScrollableView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ScrollableView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -18,13 +18,6 @@
        category:'Views-Basic'
 !
 
-ScrollableView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.20 1995-09-09 02:31:28 claus Exp $
-'!
-
 !ScrollableView class methodsFor:'documentation'!
 
 copyright
@@ -42,9 +35,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.20 1995-09-09 02:31:28 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.21 1995-11-11 16:22:27 cg Exp $'
 !
 
 documentation
--- a/Scroller.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/Scroller.st	Sat Nov 11 17:23:54 1995 +0100
@@ -33,13 +33,6 @@
 	 category:'Views-Interactors'
 !
 
-Scroller comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.28 1995-09-15 23:51:50 claus Exp $
-'!
-
 !Scroller class methodsFor:'documentation'!
 
 copyright
@@ -57,9 +50,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.28 1995-09-15 23:51:50 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.29 1995-11-11 16:22:41 cg Exp $'
 !
 
 documentation
--- a/SelList.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/SelList.st	Sat Nov 11 17:23:54 1995 +0100
@@ -34,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/SelList.st,v 1.4 1995-10-27 14:44:52 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/SelList.st,v 1.5 1995-11-11 16:22:48 cg Exp $'
 !
 
 documentation
--- a/SelListV.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/SelListV.st	Sat Nov 11 17:23:54 1995 +0100
@@ -32,13 +32,6 @@
 	 category:'Views-Text'
 !
 
-SelectionInListView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/SelListV.st,v 1.42 1995-10-27 14:44:54 cg Exp $
-'!
-
 !SelectionInListView class methodsFor:'documentation'!
 
 copyright
@@ -56,9 +49,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/SelListV.st,v 1.42 1995-10-27 14:44:54 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/SelListV.st,v 1.43 1995-11-11 16:22:59 cg Exp $'
 !
 
 documentation
--- a/SelectionInList.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/SelectionInList.st	Sat Nov 11 17:23:54 1995 +0100
@@ -34,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/SelectionInList.st,v 1.4 1995-10-27 14:44:52 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInList.st,v 1.5 1995-11-11 16:22:48 cg Exp $'
 !
 
 documentation
--- a/SelectionInListView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/SelectionInListView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -32,13 +32,6 @@
 	 category:'Views-Text'
 !
 
-SelectionInListView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.42 1995-10-27 14:44:54 cg Exp $
-'!
-
 !SelectionInListView class methodsFor:'documentation'!
 
 copyright
@@ -56,9 +49,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.42 1995-10-27 14:44:54 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.43 1995-11-11 16:22:59 cg Exp $'
 !
 
 documentation
--- a/TextColl.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/TextColl.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
        category:'Views-Text'
 !
 
-TextCollector comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/TextColl.st,v 1.23 1995-09-07 12:46:10 claus Exp $
-'!
-
 !TextCollector class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/TextColl.st,v 1.23 1995-09-07 12:46:10 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/TextColl.st,v 1.24 1995-11-11 16:23:12 cg Exp $'
 !
 
 documentation
--- a/TextCollector.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/TextCollector.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
        category:'Views-Text'
 !
 
-TextCollector comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.23 1995-09-07 12:46:10 claus Exp $
-'!
-
 !TextCollector class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.23 1995-09-07 12:46:10 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.24 1995-11-11 16:23:12 cg Exp $'
 !
 
 documentation
--- a/TextView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/TextView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -29,13 +29,6 @@
        category:'Views-Text'
 !
 
-TextView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	     All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.25 1995-10-23 20:06:51 cg Exp $
-'!
-
 !TextView class methodsFor:'documentation'!
 
 copyright
@@ -53,9 +46,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.25 1995-10-23 20:06:51 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.26 1995-11-11 16:23:18 cg Exp $'
 !
 
 documentation
--- a/Toggle.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/Toggle.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
 	 category:'Views-Interactors'
 !
 
-Toggle comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Toggle.st,v 1.18 1995-06-06 04:15:30 claus Exp $
-'!
-
 !Toggle class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Toggle.st,v 1.18 1995-06-06 04:15:30 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Toggle.st,v 1.19 1995-11-11 16:23:25 cg Exp $'
 !
 
 documentation
--- a/ToggleC.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ToggleC.st	Sat Nov 11 17:23:54 1995 +0100
@@ -34,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/ToggleC.st,v 1.7 1995-05-17 12:26:27 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ToggleC.st,v 1.8 1995-11-11 16:23:28 cg Exp $'
 !
 
 documentation
--- a/ToggleController.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/ToggleController.st	Sat Nov 11 17:23:54 1995 +0100
@@ -34,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/ToggleController.st,v 1.7 1995-05-17 12:26:27 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/ToggleController.st,v 1.8 1995-11-11 16:23:28 cg Exp $'
 !
 
 documentation
--- a/VPanelV.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/VPanelV.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
 	 category:'Views-Layout'
 !
 
-VerticalPanelView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/VPanelV.st,v 1.14 1995-09-07 12:46:16 claus Exp $
-'!
-
 !VerticalPanelView class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/VPanelV.st,v 1.14 1995-09-07 12:46:16 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/VPanelV.st,v 1.15 1995-11-11 16:23:31 cg Exp $'
 !
 
 documentation
--- a/VarHPanel.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/VarHPanel.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
 	 category:'Views-Layout'
 !
 
-VariableHorizontalPanel comment:'
-COPYRIGHT (c) 1992 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/VarHPanel.st,v 1.13 1995-03-18 05:16:26 claus Exp $
-'!
-
 !VariableHorizontalPanel class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/VarHPanel.st,v 1.13 1995-03-18 05:16:26 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/VarHPanel.st,v 1.14 1995-11-11 16:23:36 cg Exp $'
 !
 
 documentation
@@ -145,64 +136,64 @@
     |step nSubviews|
 
     subViews notNil ifTrue:[
-        (start <= stop) ifTrue:[
-            step := 1
-        ] ifFalse:[
-            step := -1
-        ].
-        nSubviews := subViews size.
-        start to:stop by:step do:[:index |
-            |bw view o1 o2 relCorner relOrg newCorner newOrg newExt|
+	(start <= stop) ifTrue:[
+	    step := 1
+	] ifFalse:[
+	    step := -1
+	].
+	nSubviews := subViews size.
+	start to:stop by:step do:[:index |
+	    |bw view o1 o2 relCorner relOrg newCorner newOrg newExt|
 
-            view := subViews at:index.
-            bw := view borderWidth.
+	    view := subViews at:index.
+	    bw := view borderWidth.
 
-            index == 1 ifTrue:[
-                o1 := 0.
-            ] ifFalse:[
-                o1 := barHeight // 2 - bw
-            ].
-            index ==  nSubviews ifTrue:[
-                o2 := 0.
-            ] ifFalse:[
-                o2 := barHeight // 2 - bw
-            ].
+	    index == 1 ifTrue:[
+		o1 := 0.
+	    ] ifFalse:[
+		o1 := barHeight // 2 - bw
+	    ].
+	    index ==  nSubviews ifTrue:[
+		o2 := 0.
+	    ] ifFalse:[
+		o2 := barHeight // 2 - bw
+	    ].
 
-            relCorner := view relativeCorner.
-            relCorner isNil ifTrue:[
-                self error:'subview must have relative corner'
-            ].
-            newCorner := view cornerFromRelativeCorner.
-            newCorner notNil ifTrue:[
-                newCorner x:(newCorner x - o2)
-            ].
+	    relCorner := view relativeCorner.
+	    relCorner isNil ifTrue:[
+		self error:'subview must have relative corner'
+	    ].
+	    newCorner := view cornerFromRelativeCorner.
+	    newCorner notNil ifTrue:[
+		newCorner x:(newCorner x - o2)
+	    ].
 
 "
-            relOrg := view relativeOrigin.
-            relOrg isNil ifTrue:[
-                self error:'subview must have relative origin'
-            ].
-            newOrg := view originFromRelativeOrigin.
-            newOrg notNil ifTrue:[
-                (index ~~ 1) ifTrue:[  
-                    newOrg x:(newOrg x + o1)
-                ].
-            ].
-            view pixelOrigin:newOrg corner:newCorner
+	    relOrg := view relativeOrigin.
+	    relOrg isNil ifTrue:[
+		self error:'subview must have relative origin'
+	    ].
+	    newOrg := view originFromRelativeOrigin.
+	    newOrg notNil ifTrue:[
+		(index ~~ 1) ifTrue:[  
+		    newOrg x:(newOrg x + o1)
+		].
+	    ].
+	    view pixelOrigin:newOrg corner:newCorner
 "
-            newOrg := view computeOrigin.
-            newOrg notNil ifTrue:[
-                (index ~~ 1) ifTrue:[  
-                    newOrg x:(newOrg x + o1)
-                ].
-            ].
-            newExt := view computeExtent.
-            newExt notNil ifTrue:[
-                newExt x:(newExt x - o2 - o1)
-            ].
+	    newOrg := view computeOrigin.
+	    newOrg notNil ifTrue:[
+		(index ~~ 1) ifTrue:[  
+		    newOrg x:(newOrg x + o1)
+		].
+	    ].
+	    newExt := view computeExtent.
+	    newExt notNil ifTrue:[
+		newExt x:(newExt x - o2 - o1)
+	    ].
 
-            view pixelOrigin:newOrg extent:newExt.
-        ]
+	    view pixelOrigin:newOrg extent:newExt.
+	]
     ]
 !
 
@@ -241,23 +232,23 @@
     x := 0.0.
 
     1 to:(subViews size) do:[:index |
-        |view|
+	|view|
 
-        view := subViews at:index.
-        e := view relativeExtent.
-        e notNil ifTrue:[
-            view relativeExtent:nil.
-            e := e x.
-            index == subViews size ifTrue:[
-                view origin:(x @ 0.0) corner:(1.0 @ 1.0)
-            ] ifFalse:[
-                view origin:(x @ 0.0) corner:((x+e) @ 1.0)
-            ].
-            x := x + e.
-        ] ifFalse: [
-            view origin:(x @ 0.0).
-            x := view relativeCorner x.
-        ].
+	view := subViews at:index.
+	e := view relativeExtent.
+	e notNil ifTrue:[
+	    view relativeExtent:nil.
+	    e := e x.
+	    index == subViews size ifTrue:[
+		view origin:(x @ 0.0) corner:(1.0 @ 1.0)
+	    ] ifFalse:[
+		view origin:(x @ 0.0) corner:((x+e) @ 1.0)
+	    ].
+	    x := x + e.
+	] ifFalse: [
+	    view origin:(x @ 0.0).
+	    x := view relativeCorner x.
+	].
     ]   
 
 ! !
@@ -369,14 +360,14 @@
 invertHandleBarAtX:hx y:hy
     self noClipByChildren.
     self xoring:[
-        |x|
+	|x|
 
-        trackLine ifTrue:[
-            x := hx + (barHeight // 2).
-            self displayLineFromX:x y:0 toX:x y:height.
-        ] ifFalse:[
-            self fillRectangleX:hx y:0 width:barHeight height:height
-        ]
+	trackLine ifTrue:[
+	    x := hx + (barHeight // 2).
+	    self displayLineFromX:x y:0 toX:x y:height.
+	] ifFalse:[
+	    self fillRectangleX:hx y:0 width:barHeight height:height
+	]
     ].
     self clipByChildren.
 
--- a/VarHPanelC.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/VarHPanelC.st	Sat Nov 11 17:23:54 1995 +0100
@@ -45,9 +45,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/VarHPanelC.st,v 1.4 1995-08-29 16:44:36 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/VarHPanelC.st,v 1.5 1995-11-11 16:23:38 cg Exp $'
 ! !
 
 !VariableHorizontalPanelController methodsFor:'initialization'!
--- a/VarPanelC.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/VarPanelC.st	Sat Nov 11 17:23:54 1995 +0100
@@ -46,9 +46,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/VarPanelC.st,v 1.5 1995-09-15 23:52:06 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/VarPanelC.st,v 1.6 1995-11-11 16:23:39 cg Exp $'
 ! !
 
 !VariablePanelController methodsFor:'event handling'!
--- a/VarVPanel.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/VarVPanel.st	Sat Nov 11 17:23:54 1995 +0100
@@ -23,13 +23,6 @@
 	 category:'Views-Layout'
 !
 
-VariableVerticalPanel comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/VarVPanel.st,v 1.20 1995-10-23 20:06:57 cg Exp $
-'!
-
 !VariableVerticalPanel class methodsFor:'documentation'!
 
 copyright
@@ -47,9 +40,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/VarVPanel.st,v 1.20 1995-10-23 20:06:57 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/VarVPanel.st,v 1.21 1995-11-11 16:23:43 cg Exp $'
 !
 
 documentation
--- a/VarVPanelC.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/VarVPanelC.st	Sat Nov 11 17:23:54 1995 +0100
@@ -45,9 +45,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/VarVPanelC.st,v 1.4 1995-08-29 16:44:47 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/VarVPanelC.st,v 1.5 1995-11-11 16:23:47 cg Exp $'
 ! !
 
 !VariableVerticalPanelController methodsFor:'initialization'!
--- a/VariableHorizontalPanel.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/VariableHorizontalPanel.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
 	 category:'Views-Layout'
 !
 
-VariableHorizontalPanel comment:'
-COPYRIGHT (c) 1992 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/VariableHorizontalPanel.st,v 1.13 1995-03-18 05:16:26 claus Exp $
-'!
-
 !VariableHorizontalPanel class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/VariableHorizontalPanel.st,v 1.13 1995-03-18 05:16:26 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/VariableHorizontalPanel.st,v 1.14 1995-11-11 16:23:36 cg Exp $'
 !
 
 documentation
@@ -145,64 +136,64 @@
     |step nSubviews|
 
     subViews notNil ifTrue:[
-        (start <= stop) ifTrue:[
-            step := 1
-        ] ifFalse:[
-            step := -1
-        ].
-        nSubviews := subViews size.
-        start to:stop by:step do:[:index |
-            |bw view o1 o2 relCorner relOrg newCorner newOrg newExt|
+	(start <= stop) ifTrue:[
+	    step := 1
+	] ifFalse:[
+	    step := -1
+	].
+	nSubviews := subViews size.
+	start to:stop by:step do:[:index |
+	    |bw view o1 o2 relCorner relOrg newCorner newOrg newExt|
 
-            view := subViews at:index.
-            bw := view borderWidth.
+	    view := subViews at:index.
+	    bw := view borderWidth.
 
-            index == 1 ifTrue:[
-                o1 := 0.
-            ] ifFalse:[
-                o1 := barHeight // 2 - bw
-            ].
-            index ==  nSubviews ifTrue:[
-                o2 := 0.
-            ] ifFalse:[
-                o2 := barHeight // 2 - bw
-            ].
+	    index == 1 ifTrue:[
+		o1 := 0.
+	    ] ifFalse:[
+		o1 := barHeight // 2 - bw
+	    ].
+	    index ==  nSubviews ifTrue:[
+		o2 := 0.
+	    ] ifFalse:[
+		o2 := barHeight // 2 - bw
+	    ].
 
-            relCorner := view relativeCorner.
-            relCorner isNil ifTrue:[
-                self error:'subview must have relative corner'
-            ].
-            newCorner := view cornerFromRelativeCorner.
-            newCorner notNil ifTrue:[
-                newCorner x:(newCorner x - o2)
-            ].
+	    relCorner := view relativeCorner.
+	    relCorner isNil ifTrue:[
+		self error:'subview must have relative corner'
+	    ].
+	    newCorner := view cornerFromRelativeCorner.
+	    newCorner notNil ifTrue:[
+		newCorner x:(newCorner x - o2)
+	    ].
 
 "
-            relOrg := view relativeOrigin.
-            relOrg isNil ifTrue:[
-                self error:'subview must have relative origin'
-            ].
-            newOrg := view originFromRelativeOrigin.
-            newOrg notNil ifTrue:[
-                (index ~~ 1) ifTrue:[  
-                    newOrg x:(newOrg x + o1)
-                ].
-            ].
-            view pixelOrigin:newOrg corner:newCorner
+	    relOrg := view relativeOrigin.
+	    relOrg isNil ifTrue:[
+		self error:'subview must have relative origin'
+	    ].
+	    newOrg := view originFromRelativeOrigin.
+	    newOrg notNil ifTrue:[
+		(index ~~ 1) ifTrue:[  
+		    newOrg x:(newOrg x + o1)
+		].
+	    ].
+	    view pixelOrigin:newOrg corner:newCorner
 "
-            newOrg := view computeOrigin.
-            newOrg notNil ifTrue:[
-                (index ~~ 1) ifTrue:[  
-                    newOrg x:(newOrg x + o1)
-                ].
-            ].
-            newExt := view computeExtent.
-            newExt notNil ifTrue:[
-                newExt x:(newExt x - o2 - o1)
-            ].
+	    newOrg := view computeOrigin.
+	    newOrg notNil ifTrue:[
+		(index ~~ 1) ifTrue:[  
+		    newOrg x:(newOrg x + o1)
+		].
+	    ].
+	    newExt := view computeExtent.
+	    newExt notNil ifTrue:[
+		newExt x:(newExt x - o2 - o1)
+	    ].
 
-            view pixelOrigin:newOrg extent:newExt.
-        ]
+	    view pixelOrigin:newOrg extent:newExt.
+	]
     ]
 !
 
@@ -241,23 +232,23 @@
     x := 0.0.
 
     1 to:(subViews size) do:[:index |
-        |view|
+	|view|
 
-        view := subViews at:index.
-        e := view relativeExtent.
-        e notNil ifTrue:[
-            view relativeExtent:nil.
-            e := e x.
-            index == subViews size ifTrue:[
-                view origin:(x @ 0.0) corner:(1.0 @ 1.0)
-            ] ifFalse:[
-                view origin:(x @ 0.0) corner:((x+e) @ 1.0)
-            ].
-            x := x + e.
-        ] ifFalse: [
-            view origin:(x @ 0.0).
-            x := view relativeCorner x.
-        ].
+	view := subViews at:index.
+	e := view relativeExtent.
+	e notNil ifTrue:[
+	    view relativeExtent:nil.
+	    e := e x.
+	    index == subViews size ifTrue:[
+		view origin:(x @ 0.0) corner:(1.0 @ 1.0)
+	    ] ifFalse:[
+		view origin:(x @ 0.0) corner:((x+e) @ 1.0)
+	    ].
+	    x := x + e.
+	] ifFalse: [
+	    view origin:(x @ 0.0).
+	    x := view relativeCorner x.
+	].
     ]   
 
 ! !
@@ -369,14 +360,14 @@
 invertHandleBarAtX:hx y:hy
     self noClipByChildren.
     self xoring:[
-        |x|
+	|x|
 
-        trackLine ifTrue:[
-            x := hx + (barHeight // 2).
-            self displayLineFromX:x y:0 toX:x y:height.
-        ] ifFalse:[
-            self fillRectangleX:hx y:0 width:barHeight height:height
-        ]
+	trackLine ifTrue:[
+	    x := hx + (barHeight // 2).
+	    self displayLineFromX:x y:0 toX:x y:height.
+	] ifFalse:[
+	    self fillRectangleX:hx y:0 width:barHeight height:height
+	]
     ].
     self clipByChildren.
 
--- a/VariableHorizontalPanelController.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/VariableHorizontalPanelController.st	Sat Nov 11 17:23:54 1995 +0100
@@ -45,9 +45,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/VariableHorizontalPanelController.st,v 1.4 1995-08-29 16:44:36 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/VariableHorizontalPanelController.st,v 1.5 1995-11-11 16:23:38 cg Exp $'
 ! !
 
 !VariableHorizontalPanelController methodsFor:'initialization'!
--- a/VariablePanelController.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/VariablePanelController.st	Sat Nov 11 17:23:54 1995 +0100
@@ -46,9 +46,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/VariablePanelController.st,v 1.5 1995-09-15 23:52:06 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanelController.st,v 1.6 1995-11-11 16:23:39 cg Exp $'
 ! !
 
 !VariablePanelController methodsFor:'event handling'!
--- a/VariableVerticalPanel.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/VariableVerticalPanel.st	Sat Nov 11 17:23:54 1995 +0100
@@ -23,13 +23,6 @@
 	 category:'Views-Layout'
 !
 
-VariableVerticalPanel comment:'
-COPYRIGHT (c) 1991 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/VariableVerticalPanel.st,v 1.20 1995-10-23 20:06:57 cg Exp $
-'!
-
 !VariableVerticalPanel class methodsFor:'documentation'!
 
 copyright
@@ -47,9 +40,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/VariableVerticalPanel.st,v 1.20 1995-10-23 20:06:57 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/VariableVerticalPanel.st,v 1.21 1995-11-11 16:23:43 cg Exp $'
 !
 
 documentation
--- a/VariableVerticalPanelController.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/VariableVerticalPanelController.st	Sat Nov 11 17:23:54 1995 +0100
@@ -45,9 +45,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/VariableVerticalPanelController.st,v 1.4 1995-08-29 16:44:47 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/VariableVerticalPanelController.st,v 1.5 1995-11-11 16:23:47 cg Exp $'
 ! !
 
 !VariableVerticalPanelController methodsFor:'initialization'!
--- a/VerticalPanelView.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/VerticalPanelView.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
 	 category:'Views-Layout'
 !
 
-VerticalPanelView comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/VerticalPanelView.st,v 1.14 1995-09-07 12:46:16 claus Exp $
-'!
-
 !VerticalPanelView class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/VerticalPanelView.st,v 1.14 1995-09-07 12:46:16 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/VerticalPanelView.st,v 1.15 1995-11-11 16:23:31 cg Exp $'
 !
 
 documentation
--- a/WarnBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/WarnBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-DialogBoxes'
 !
 
-WarningBox comment:'
-COPYRIGHT (c) 1993 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Attic/WarnBox.st,v 1.9 1995-03-20 11:52:01 claus Exp $
-'!
-
 !WarningBox class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Attic/WarnBox.st,v 1.9 1995-03-20 11:52:01 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/WarnBox.st,v 1.10 1995-11-11 16:23:48 cg Exp $'
 !
 
 documentation
--- a/WarningBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/WarningBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-DialogBoxes'
 !
 
-WarningBox comment:'
-COPYRIGHT (c) 1993 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.9 1995-03-20 11:52:01 claus Exp $
-'!
-
 !WarningBox class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.9 1995-03-20 11:52:01 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.10 1995-11-11 16:23:48 cg Exp $'
 !
 
 documentation
--- a/Workspace.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/Workspace.st	Sat Nov 11 17:23:54 1995 +0100
@@ -19,13 +19,6 @@
        category:'Interface-Workspace'
 !
 
-Workspace comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	     All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.28 1995-09-14 17:44:12 claus Exp $
-'!
-
 !Workspace class methodsFor:'documentation'!
 
 copyright
@@ -43,9 +36,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.28 1995-09-14 17:44:12 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.29 1995-11-11 16:23:51 cg Exp $'
 !
 
 documentation
--- a/YesNoBox.st	Wed Nov 01 15:53:21 1995 +0100
+++ b/YesNoBox.st	Sat Nov 11 17:23:54 1995 +0100
@@ -17,13 +17,6 @@
        category:'Views-DialogBoxes'
 !
 
-YesNoBox comment:'
-COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
-
-$Header: /cvs/stx/stx/libwidg/YesNoBox.st,v 1.18 1995-09-18 10:39:22 claus Exp $
-'!
-
 !YesNoBox class methodsFor:'documentation'!
 
 copyright
@@ -41,9 +34,7 @@
 !
 
 version
-"
-$Header: /cvs/stx/stx/libwidg/YesNoBox.st,v 1.18 1995-09-18 10:39:22 claus Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libwidg/YesNoBox.st,v 1.19 1995-11-11 16:23:54 cg Exp $'
 !
 
 documentation