Function: json--print-alist

json--print-alist is a byte-compiled function defined in json.el.gz.

Signature

(json--print-alist ALIST &optional DESTRUCTIVE)

Documentation

Insert a JSON representation of ALIST at point.

Sort ALIST first if json-encoding-object-sort-predicate is non-nil. Sorting can optionally be DESTRUCTIVE for speed.

Source Code

;; Defined in /usr/src/emacs/lisp/json.el.gz
;; List encoding (including alists and plists)

(defun json--print-alist (alist &optional destructive)
  "Insert a JSON representation of ALIST at point.
Sort ALIST first if `json-encoding-object-sort-predicate' is
non-nil.  Sorting can optionally be DESTRUCTIVE for speed."
  (json--print-map (let ((pred json-encoding-object-sort-predicate))
                     (if (and pred alist)
                         (sort alist :key #'car :lessp pred
                               :in-place destructive)
                       alist))))