*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Wed, 16 Feb 2005 13:32:14 +0100
changeset 6195 99f6801ee82b
parent 6194 b18a3992bc53
child 6196 edc7839504d8
*** empty log message ***
AbstractFileBrowser.st
--- 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 $'
 ! !