remove a use of normal-case-path

closes PR 6086
2013-03-02 20:35:44 -06:00 · 2013-03-02 20:35:44 -06:00 · be0e32b224
commit be0e32b224
parent 855ce453a0
1 changed files with 1 additions and 1 deletions
--- a/collects/framework/private/finder.rkt
+++ b/collects/framework/private/finder.rkt
@ -47,7 +47,7 @@
                          (default-extension) style (default-filters)
                          #:dialog-mixin frame:focus-table-mixin)])
        (and f (or (not filter) (filter-match? filter f filter-msg))
-             (let* ([f (normal-case-path (simple-form-path f))]
+             (let* ([f (simple-form-path f)]
                    [dir (path-only f)]
                    [name (file-name-from-path f)])
               (cond