diff --git a/src/mred/wrap/mred.ss b/src/mred/wrap/mred.ss
index cf41b34b..38fa0211 100644
--- a/src/mred/wrap/mred.ss
+++ b/src/mred/wrap/mred.ss
@@ -5002,7 +5002,7 @@
 ; We duplicate the case-lambda for `get-file', `get-file-list', and `put-file' so that they have the
 ;   right arities and names
 
-(define default-filters '(("Any file (*.*)" "*.*")))
+(define default-filters '(("Any" "*.*")))
 
 (define get-file
   (case-lambda