From a33da903c6aeb1cd9fbcc39edbfb43de0f752ed3 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Tue, 28 May 2019 07:50:57 -0700 Subject: [PATCH] duh (fixes #24) --- quad/quadwriter/lang-helper.rkt | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/quad/quadwriter/lang-helper.rkt b/quad/quadwriter/lang-helper.rkt index 4f5a3d3d..1727ae04 100644 --- 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)))))