--- a/FileOperation.st	Tue Sep 05 11:12:52 2006 +0200
+++ b/FileOperation.st	Tue Sep 05 12:56:18 2006 +0200
@@ -562,17 +562,15 @@
     (startDirectory construct:initialAnswer) exists ifTrue:[
         initialAnswer := nil.
     ].
-    Dialog aboutToOpenBoxNotificationSignal ignoreIn:[
-        newName := Dialog
-                        request:(resources string:'Create New Directory in %1:' with:startBaseName allBold)
-                        initialAnswer:initialAnswer
-                        okLabel:(resources string:'Create')
-                        title:(resources string:'Create Directory')
-                        onCancel:[
-                            self result:false. 
-                            ^ self
-                        ].
-    ].
+    newName := Dialog
+                    request:(resources string:'Create New Directory in %1:' with:startBaseName allBold)
+                    initialAnswer:initialAnswer
+                    okLabel:(resources string:'Create')
+                    title:(resources string:'Create Directory')
+                    onCancel:[
+                        self result:false. 
+                        ^ self
+                    ].
     newName isEmpty ifTrue:[
         self result:false. 
         ^ self
@@ -594,6 +592,8 @@
     self createdFile:newDir.
     LastCreatedDirectory := newDir.
     result := true.
+
+    "Modified: / 05-09-2006 / 11:52:48 / cg"
 !
 
 createFileIn:aFile
@@ -867,18 +867,15 @@
                        (nFilesToDelete = 1 
                             ifTrue:'\\%1%2 ?' 
                             ifFalse:'\\%1%2 \\(%3 files alltogether)').
-                Dialog aboutToOpenBoxNotificationSignal handle:[:ex | ex proceed]
-                do:[
-                    answer := Dialog 
-                        confirmWithCancel:(resources 
-                                            stringWithCRs:msg 
-                                            with:fileTypeString
-                                            with:(filename asString allBold)
-                                            with:nFilesToDelete)
-                        labels:(resources array:labels)
-                        values:values
-                        default:(values indexOf:#yes).
-                ]
+                answer := Dialog 
+                    confirmWithCancel:(resources 
+                                        stringWithCRs:msg 
+                                        with:fileTypeString
+                                        with:(filename asString allBold)
+                                        with:nFilesToDelete)
+                    labels:(resources array:labels)
+                    values:values
+                    default:(values indexOf:#yes).
             ] ifFalse:[
                 answer := #yesToAll.
             ].
@@ -928,7 +925,7 @@
         ].
     ].
 
-    "Modified: / 29-08-2006 / 12:56:37 / cg"
+    "Modified: / 05-09-2006 / 11:52:35 / cg"
 ! !
 
 !FileOperation::Erase methodsFor:'actions'!
@@ -1339,5 +1336,5 @@
 !FileOperation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.73 2006-08-29 10:58:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.74 2006-09-05 10:56:18 cg Exp $'
 ! !