Disable JSON pretty-printing
This commit is contained in:
parent
1eaf2c099a
commit
3f52469f31
|
@ -124,7 +124,6 @@ prop-id of the inserted or existing property."
|
|||
|
||||
(defun chronometrist-sqlite-properties-to-json (plist)
|
||||
"Return PLIST as a JSON string."
|
||||
(let ((json-encoding-pretty-print t))
|
||||
(json-encode
|
||||
;; `json-encode' throws an error when it thinks
|
||||
;; it sees "alists" which have numbers as
|
||||
|
@ -136,7 +135,7 @@ prop-id of the inserted or existing property."
|
|||
((consp elt)
|
||||
(vconcat elt))
|
||||
(t elt)))
|
||||
plist))))
|
||||
plist)))
|
||||
|
||||
(defcustom chronometrist-sqlite-properties-function nil
|
||||
"Function used to control the encoding of user key-values.
|
||||
|
|
|
@ -171,7 +171,6 @@ prop-id of the inserted or existing property."
|
|||
#+BEGIN_SRC emacs-lisp
|
||||
(defun chronometrist-sqlite-properties-to-json (plist)
|
||||
"Return PLIST as a JSON string."
|
||||
(let ((json-encoding-pretty-print t))
|
||||
(json-encode
|
||||
;; `json-encode' throws an error when it thinks
|
||||
;; it sees "alists" which have numbers as
|
||||
|
@ -183,7 +182,7 @@ prop-id of the inserted or existing property."
|
|||
((consp elt)
|
||||
(vconcat elt))
|
||||
(t elt)))
|
||||
plist))))
|
||||
plist)))
|
||||
#+END_SRC
|
||||
|
||||
*** properties-function :custom:variable:
|
||||
|
|
Reference in New Issue