Function: org-persist-write:generic

org-persist-write:generic is a macro defined in org-persist.el.gz.

Signature

(org-persist-write:generic CONTAINER COLLECTION)

Documentation

Write CONTAINER in COLLECTION.

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-persist.el.gz
;;;; Writing container data

(defmacro org-persist-write:generic (container collection)
  "Write CONTAINER in COLLECTION."
  `(let* ((c (org-persist--normalize-container ,container))
          (write-func-symbol (intern (format "org-persist-write:%s" (car c)))))
     (unless (plist-get ,collection :last-access)
       (setf ,collection (plist-put ,collection :last-access (float-time)))
       (setf ,collection (plist-put ,collection :last-access-hr (format-time-string "%FT%T%z" (float-time)))))
     (unless (fboundp write-func-symbol)
       (error "org-persist: Write function %s not defined"
              write-func-symbol))
     (funcall write-func-symbol c ,collection)))