--- a/FilenameWidgetWithHistory.st	Thu Aug 22 10:43:04 2013 +0200
+++ b/FilenameWidgetWithHistory.st	Thu Aug 22 15:54:50 2013 +0200
@@ -280,11 +280,7 @@
     |path |
 
     Dialog aboutToOpenBoxNotificationSignal handle:[:ex |
-        |dialog|
-
-        dialog := ex parameter.
-        dialog perform:#browseVisibleHolder with:true ifNotUnderstood:[].
-        ex proceed.
+        ex box perform:#browseVisibleHolder with:true ifNotUnderstood:[].
     ] do:[
         |title defaultPath defaultDir|
 
@@ -342,9 +338,10 @@
 !FilenameWidgetWithHistory class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.20 2011-10-05 13:00:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.21 2013-08-22 13:54:50 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.20 2011-10-05 13:00:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.21 2013-08-22 13:54:50 cg Exp $'
 ! !
+