Use pr-str for clj/sjacket roundtrip. Fixes #1632.
This commit is contained in:
parent
2a3fe249c0
commit
da57eb0440
1 changed files with 1 additions and 3 deletions
|
@ -14,9 +14,7 @@
|
|||
(throw (IllegalArgumentException. msg)))
|
||||
|
||||
(defn- clj->sjacket [value]
|
||||
(if (string? value)
|
||||
(str "\"" value "\"")
|
||||
(-> value print-str parser/parser :content first)))
|
||||
(-> value pr-str parser/parser :content first))
|
||||
|
||||
;; NOTE: this destroy comments, formatting, etc.
|
||||
(defn- sjacket->clj [value]
|
||||
|
|
Loading…
Reference in a new issue