--- a/AbstractFileBrowser.st Tue Nov 18 09:04:04 2003 +0100
+++ b/AbstractFileBrowser.st Tue Nov 18 13:07:43 2003 +0100
@@ -189,7 +189,9 @@
|bookmarks s fileName|
fileName := aFileNameOrString asFilename.
- s := fileName readStream.
+ FileStream openErrorSignal catch:[
+ s := fileName readStream.
+ ].
s isNil ifTrue:[
^ self.
].
@@ -5461,12 +5463,7 @@
!
canRemoveCVSContainer
-
- |selectedFiles|
-
- selectedFiles := self currentSelectedFiles.
-
- ^ selectedFiles
+ ^ self currentSelectedFiles
contains:[:fileName|
|dirOfFile cvsDir|
@@ -6476,5 +6473,5 @@
!AbstractFileBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.183 2003-11-11 09:50:35 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.184 2003-11-18 12:07:43 cg Exp $'
! !