diff --git a/collects/mred/finder.ss b/collects/mred/finder.ss
index 19e091ab..3c921cb5 100644
--- a/collects/mred/finder.ss
+++ b/collects/mred/finder.ss
@@ -776,7 +776,7 @@
 		null 
 		null 
 		"*"
-		0 
+		wx:const-open 
 		parent-win)])
 	(if (null? f)
 	    #f