class: Class
authorStefan Vogel <sv@exept.de>
Thu, 21 Nov 2013 16:02:57 +0100
changeset 15821 5ba671bedf2e
parent 15820 e3f9d2b49584
child 15822 3fc626394707
class: Class changed: #fileOutAs: no need to delete before renameTo:
Class.st
--- a/Class.st	Thu Nov 21 08:45:24 2013 +0000
+++ b/Class.st	Thu Nov 21 16:02:57 2013 +0100
@@ -2528,7 +2528,6 @@
     needRename ifTrue:[
         fileExists ifTrue:[
             savFilename := filename addSuffix:'.sav~'.
-            savFilename delete.
             filename renameTo:savFilename.
         ].
         outStream fileName renameTo:filename.
@@ -5554,11 +5553,11 @@
 !Class class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.631 2013-10-22 11:16:02 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.632 2013-11-21 15:02:57 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.631 2013-10-22 11:16:02 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.632 2013-11-21 15:02:57 stefan Exp $'
 !
 
 version_SVN