catch none existing changefile
authorca
Wed, 27 Sep 2006 08:03:34 +0200
changeset 7346 a5129e941e23
parent 7345 b8202ccfecad
child 7347 4df230873b7b
catch none existing changefile
ChangesBrowser.st
--- a/ChangesBrowser.st	Tue Sep 26 17:23:53 2006 +0200
+++ b/ChangesBrowser.st	Wed Sep 27 08:03:34 2006 +0200
@@ -2434,6 +2434,7 @@
     ].
 
     f := changeFileName asFilename.
+    f exists ifFalse:[^ self].
     inStream :=  f readStream.
 
     encoding := CharacterEncoder guessEncodingOfStream:inStream.
@@ -5832,5 +5833,5 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.354 2006-09-12 15:20:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.355 2006-09-27 06:03:34 ca Exp $'
 ! !