duh (fixes #24)

5 years ago · a33da903c6
parent 8c7457ec39
commit a33da903c6
1 changed files with 3 additions and 3 deletions
--- a/quad/quadwriter/lang-helper.rkt
+++ b/quad/quadwriter/lang-helper.rkt
@ -56,9 +56,9 @@
              (define (VIEW-RESULT)
                (define open-string
                  (case (system-type 'os)
-                    [(macosx) "open ~a"]
-                    [(windows) "start ~a"]
-                    [(unix) "xdg-open ~a &> /dev/null"]
+                    [(macosx) "open '~a'"]
+                    [(windows) "start '~a'"]
+                    [(unix) "xdg-open '~a' &> /dev/null"]
                    [else (error "Don't know how to open PDF file.")]))
                (when (file-exists? pdf-path)
                  (void (system (format open-string pdf-path)))))