don't convert to string

2 years ago · 6cf3d0895f
parent 4f99f4d38a
commit 6cf3d0895f
1 changed files with 1 additions and 1 deletions
--- a/quad2/attr.rkt
+++ b/quad2/attr.rkt
@ -98,7 +98,7 @@
  ;; relies on `current-directory` being parameterized to source file's dir
  (do-attr-iteration qs
                     #:which-attr attr-path?
-                     #:value-proc (λ (val attrs) (path->string (path->complete-path val)))))
+                     #:value-proc (λ (val attrs) (path->complete-path val))))

 (define-pass (parse-dimension-strings qs)
  #:pre (list-of quad?)