diff --git a/collects/mred/finder.ss b/collects/mred/finder.ss
index ab7714ad..d72e4a4a 100644
--- a/collects/mred/finder.ss
+++ b/collects/mred/finder.ss
@@ -317,7 +317,8 @@
 		  (show #f)]
 		 [(directory-exists? t)
 		  (set-directory (mzlib:file:normalize-path t))]
-		 [else (wx:bell)])))])
+		 [else (wx:message-box (format "~a doesn't exist" t))])))])
+			
 	(sequence
 	  (when (eq? wx:platform 'unix)
 	    (make-object mred:container:check-box% period-panel