--- 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