inserted a coercion string->path

(there is one on the line above so this is probably the right thing) closes PR 11563
2010-12-24 15:56:10 -06:00 · 2010-12-24 15:56:10 -06:00 · 8903de5a12
commit 8903de5a12
parent da68fc209a
1 changed files with 1 additions and 1 deletions
--- a/collects/mred/private/wx/win32/filedialog.rkt
+++ b/collects/mred/private/wx/win32/filedialog.rkt
@ -185,7 +185,7 @@
                       #f
                       (map (lambda (p) (build-path (car strs) p))
                            (cdr strs))))
-                 (cast (OPENFILENAME-lpstrFile ofn) _pointer _string/utf-16)))
+                 (string->path (cast (OPENFILENAME-lpstrFile ofn) _pointer _string/utf-16))))
        (when directory
          (free (OPENFILENAME-lpstrInitialDir ofn)))
        (when message