Merge pull request #118 from mmirate/patch-1

* fix intra-array separator in JSON address fields output by mu-sexp-convert
This commit is contained in:
Dirk-Jan C. Binnema
2012-12-22 05:00:10 -08:00

View File

@ -156,7 +156,7 @@ into a list of pairs
(if (string? (cdr addr)) (if (string? (cdr addr))
(format #f "\"email\": \"~a\"" (format #f "\"email\": \"~a\""
(string->json (cdr addr))) ""))) (string->json (cdr addr))) "")))
expr " ") expr ", ")
"]")) "]"))
((string= parent "parts") "[]") ;; todo ((string= parent "parts") "[]") ;; todo
;; convert the crazy emacs time thingy to time_t... ;; convert the crazy emacs time thingy to time_t...