diff --git a/libflac/flac-decoder.rkt b/libflac/flac-decoder.rkt
index f9507a0..5c3b6b4 100644
--- a/libflac/flac-decoder.rkt
+++ b/libflac/flac-decoder.rkt
@@ -20,7 +20,7 @@
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
   (define (flac-open flac-file* cb-stream-info cb-audio)
-    (let ((flac-file (if (path? flac-file*) (path->string flac-file* flac-file*))))
+    (let ((flac-file (if (path? flac-file*) (path->string flac-file*) flac-file*)))
       (if (file-exists? flac-file)
           (let ((handler (flac-ffi-decoder-handler)))
             (handler 'new)