--- a/Method.st	Thu Nov 07 19:08:20 1996 +0100
+++ b/Method.st	Thu Nov 07 19:09:18 1996 +0100
@@ -2320,11 +2320,11 @@
 previousVersion
     |history|
 
-    history := Class oldMethods.
+    history := Class methodHistory.
     history isNil ifTrue:[^ nil].
     ^ history at:self ifAbsent:nil
 
-    "Modified: 7.11.1996 / 18:41:26 / cg"
+    "Modified: 7.11.1996 / 19:06:22 / cg"
 !
 
 selector
@@ -2638,6 +2638,6 @@
 !Method class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.109 1996-11-07 17:56:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.110 1996-11-07 18:09:18 cg Exp $'
 ! !
 Method initialize!