--- a/Filename.st	Fri Aug 14 17:36:03 1998 +0200
+++ b/Filename.st	Fri Aug 14 18:19:03 1998 +0200
@@ -1757,14 +1757,18 @@
 modificationTime
     "return a timeStamp containing the files modification time."
 
-    ^ self info modified
+    |i|
+
+    (i := self info) isNil ifTrue:[^ nil].      "/ non-existing
+    ^ i modified
 
     "
      Filename currentDirectory modificationTime
     "
 
-    "Created: 9.7.1996 / 10:18:59 / cg"
-    "Modified: 26.9.1997 / 13:05:39 / stefan"
+    "Created: / 9.7.1996 / 10:18:59 / cg"
+    "Modified: / 26.9.1997 / 13:05:39 / stefan"
+    "Modified: / 14.8.1998 / 17:42:50 / cg"
 !
 
 type
@@ -2949,6 +2953,6 @@
 !Filename class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.129 1998-08-12 12:46:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.130 1998-08-14 16:19:03 cg Exp $'
 ! !
 Filename initialize!