Separator.st
changeset 602 342ca1c098a6
parent 323 61fe6bb4b5ee
child 864 d84a7a02f037
--- a/Separator.st	Sun Nov 02 18:44:14 1997 +0100
+++ b/Separator.st	Sun Nov 02 18:56:48 1997 +0100
@@ -215,14 +215,16 @@
 !
 
 specClass
+    "redefined, since the name of my specClass is nonStandard (i.e. not SeparatorSpec)"
+
     self class == Separator ifTrue:[^ DividerSpec].
     ^ super specClass
 
-
+    "Modified: / 31.10.1997 / 19:48:40 / cg"
 ! !
 
 !Separator class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/Separator.st,v 1.15 1997-03-17 11:11:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/Separator.st,v 1.16 1997-11-02 17:56:48 cg Exp $'
 ! !