--- a/AbstractFileBrowser.st Wed Feb 16 13:31:54 2005 +0100
+++ b/AbstractFileBrowser.st Wed Feb 16 13:32:14 2005 +0100
@@ -4744,9 +4744,6 @@
|fileNames infoDir filesBySize result info stream textBox maxLength directories allFiles titleStream size|
-"/ (self askIfModified:'contents has not been saved.\\Modifications will be lost when you proceed.'
-"/ yesButton:'proceed') ifFalse:[^ self].
-
self withWaitCursorDo:[
result := Dictionary new.
@@ -6603,5 +6600,5 @@
!AbstractFileBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.278 2005-02-16 09:40:07 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.279 2005-02-16 12:32:14 cg Exp $'
! !