--- a/Method.st	Wed Dec 15 22:21:34 1999 +0100
+++ b/Method.st	Thu Dec 16 15:55:42 1999 +0100
@@ -275,9 +275,13 @@
 !Method class methodsFor:'special'!
 
 flushSourceStreamCache
-    LastSourceFileName := nil
+    LastSourceFileName := LastMethodSources := nil
 
     "Created: 9.2.1996 / 19:05:28 / cg"
+
+"
+self flushSourceStreamCache
+"
 ! !
 
 !Method methodsFor:'accessing'!
@@ -2463,6 +2467,6 @@
 !Method class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.179 1999-11-29 13:38:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.180 1999-12-16 14:55:42 ca Exp $'
 ! !
 Method initialize!