--- a/SeqColl.st	Fri May 08 17:24:46 1998 +0200
+++ b/SeqColl.st	Fri May 08 21:28:04 1998 +0200
@@ -2378,7 +2378,10 @@
     "OBSOLETE: use isSequenceable for ST-80 compatibility.
      This method is a historic leftover and will be removed."
 
+    self obsoleteMethodWarning:'use #isSequenceable'.
     ^ true
+
+    "Modified: / 8.5.1998 / 21:27:18 / cg"
 !
 
 keys
@@ -3381,5 +3384,5 @@
 !SequenceableCollection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/SeqColl.st,v 1.91 1998-04-25 14:51:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/SeqColl.st,v 1.92 1998-05-08 19:28:04 cg Exp $'
 ! !

--- a/SequenceableCollection.st	Fri May 08 17:24:46 1998 +0200
+++ b/SequenceableCollection.st	Fri May 08 21:28:04 1998 +0200
@@ -2378,7 +2378,10 @@
     "OBSOLETE: use isSequenceable for ST-80 compatibility.
      This method is a historic leftover and will be removed."
 
+    self obsoleteMethodWarning:'use #isSequenceable'.
     ^ true
+
+    "Modified: / 8.5.1998 / 21:27:18 / cg"
 !
 
 keys
@@ -3381,5 +3384,5 @@
 !SequenceableCollection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.91 1998-04-25 14:51:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.92 1998-05-08 19:28:04 cg Exp $'
 ! !