changed: #lowSpaceCleanup
authorClaus Gittinger <cg@exept.de>
Mon, 23 Jul 2012 11:07:18 +0200
changeset 14236 d383e9f70795
parent 14235 810d699d6963
child 14237 2e7bbfbda700
changed: #lowSpaceCleanup
Method.st
--- a/Method.st	Sun Jul 22 11:10:54 2012 +0200
+++ b/Method.st	Mon Jul 23 11:07:18 2012 +0200
@@ -225,6 +225,7 @@
 lowSpaceCleanup
     LastParseTreeCache := nil.
     LastSourceFileName := LastWhoClass := nil.
+    self flushSourceStreamCache.
 
     "Created: / 08-08-2011 / 19:11:23 / cg"
 ! !
@@ -3611,11 +3612,11 @@
 !Method class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.386 2012-07-20 18:20:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.387 2012-07-23 09:07:18 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.386 2012-07-20 18:20:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.387 2012-07-23 09:07:18 cg Exp $'
 !
 
 version_SVN