--- a/ImageSequence.st	Wed Apr 01 14:45:23 1998 +0200
+++ b/ImageSequence.st	Wed Apr 01 14:46:30 1998 +0200
@@ -12,8 +12,8 @@
 
 "
 
-Object subclass:#ImageSequence
-	instanceVariableNames:'frames'
+OrderedCollection subclass:#ImageSequence
+	instanceVariableNames:''
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Graphics-Images'
@@ -53,26 +53,8 @@
 "
 ! !
 
-!ImageSequence methodsFor:'accessing'!
-
-frames
-    "return the value of the instance variable 'frames' (automatically generated)"
-
-    ^ frames
-
-    "Created: 24.6.1997 / 20:43:20 / cg"
-!
-
-frames:something
-    "set the value of the instance variable 'frames' (automatically generated)"
-
-    frames := something.
-
-    "Created: 24.6.1997 / 20:43:21 / cg"
-! !
-
 !ImageSequence class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ImageSequence.st,v 1.2 1997-06-27 17:24:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ImageSequence.st,v 1.3 1998-04-01 12:46:30 cg Exp $'
 ! !