original commit: 7c11b9c95a5f8f66076723386b61152dbbb64b03
This commit is contained in:
Matthew Flatt 2000-09-13 23:06:07 +00:00
parent 02c5168890
commit 2de081a7c5

View File

@ -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