class: FilenameWidgetWithHistory
authorClaus Gittinger <cg@exept.de>
Fri, 27 Feb 2015 16:31:27 +0100
changeset 4721 e3cb03ac761a
parent 4720 5e42160bc8f1
child 4722 48daa9baf996
class: FilenameWidgetWithHistory changed: #browseForFileOrDirectory
FilenameWidgetWithHistory.st
--- a/FilenameWidgetWithHistory.st	Thu Feb 26 10:57:49 2015 +0100
+++ b/FilenameWidgetWithHistory.st	Fri Feb 27 16:31:27 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2007 by eXept Software AG
               All Rights Reserved
@@ -281,8 +283,8 @@
 browseForFileOrDirectory
     |path |
 
-    Dialog aboutToOpenBoxNotificationSignal handle:[:ex |
-        ex box perform:#browseVisibleHolder with:true ifNotUnderstood:[].
+    Dialog modifyingBoxWith:[:box |
+        box perform:#browsemenuItemVisibleHolder: with:true ifNotUnderstood:[].
     ] do:[
         |title defaultPath defaultDir|
 
@@ -340,10 +342,10 @@
 !FilenameWidgetWithHistory class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.22 2015-02-13 10:58:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.23 2015-02-27 15:31:27 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.22 2015-02-13 10:58:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.23 2015-02-27 15:31:27 cg Exp $'
 ! !