--- a/FileApplicationNoteBook.st	Tue May 11 16:36:12 2004 +0200
+++ b/FileApplicationNoteBook.st	Tue May 11 16:48:58 2004 +0200
@@ -4276,6 +4276,10 @@
     |file contents present alreadyConfirmed|
 
     file := self fileName.
+    file isNil ifTrue:[
+        ^ nil
+    ].
+
     ExternalStream readErrorSignal handle:[:ex |
         (Dialog confirm:('Read Error.\\Retry ?' withCRs))    
         ifTrue:[
@@ -5489,5 +5493,5 @@
 !FileApplicationNoteBook class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.167 2004-03-21 16:36:31 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.168 2004-05-11 14:48:58 cg Exp $'
 ! !