Fixed bug in reading string values

but still buggy if first character is digit
This commit is contained in:
Simon Brooke 2020-01-27 15:48:11 +00:00
parent b5c6b5d7a5
commit 837c43ac32

View file

@ -16,7 +16,8 @@
integer or real in our data rather than a string representation of it." integer or real in our data rather than a string representation of it."
[^String s] [^String s]
(try (try
(read-string s) (let [v (read-string s)]
(if (number? v) v s))
(catch Exception _ s))) (catch Exception _ s)))
(defn csv->edn (defn csv->edn