Function: majutsu-diff--parse-file-metadata-line

majutsu-diff--parse-file-metadata-line is a natively compiled function defined in majutsu-diff.el.

Signature

(majutsu-diff--parse-file-metadata-line LINE)

Documentation

Parse one JSON diff metadata LINE into a plist, or return nil.

Source Code

;; Defined in /nix/store/jagqw3nms546pad0gxi5f3wsckk6pji7-emacs-packages-deps/share/emacs/site-lisp/majutsu-diff.el
(defun majutsu-diff--parse-file-metadata-line (line)
  "Parse one JSON diff metadata LINE into a plist, or return nil."
  (condition-case nil
      (pcase (json-parse-string line
                                :array-type 'list
                                :null-object nil
                                :false-object nil)
        (`(,status ,source ,target)
         (when (and (stringp status)
                    (stringp source)
                    (stringp target))
           (list :status status
                 :source source
                 :target target))))
    (error nil)))