Filename.st
changeset 18637 2b83caba8463
parent 18490 ec5c1c050681
child 18640 358b275dced9
child 18659 22893335c53f
--- a/Filename.st	Fri Jul 24 13:58:34 2015 +0200
+++ b/Filename.st	Fri Jul 24 14:17:54 2015 +0200
@@ -3372,9 +3372,12 @@
     osName := self osNameForFile.
     (ok := OperatingSystem removeFile:osName) ifFalse:[
         linkInfo := self linkInfo.
-        (linkInfo notNil and:[linkInfo isDirectory]) ifTrue:[
+        linkInfo isNil ifTrue:[
+            "file does not exist - no error"
+            ^ self.
+        ] ifFalse:[linkInfo isDirectory ifTrue:[
             ok := OperatingSystem removeDirectory:osName
-        ].
+        ]].
         ok ifFalse:[
             self exists ifTrue:[
                 self removeError:self