Function: org-local-logging

org-local-logging is a byte-compiled function defined in org.el.gz.

Signature

(org-local-logging VALUE)

Documentation

Get logging settings from a property VALUE.

Source Code

;; Defined in /usr/src/emacs/lisp/org/org.el.gz
(defun org-local-logging (value)
  "Get logging settings from a property VALUE."
  ;; Directly set the variables, they are already local.
  (setq org-log-done nil
        org-log-repeat nil
        org-todo-log-states nil)
  (dolist (w (split-string value))
    (let (a)
      (cond
       ((setq a (assoc w org-startup-options))
        (and (member (nth 1 a) '(org-log-done org-log-repeat))
             (set (nth 1 a) (nth 2 a))))
       ((setq a (org-extract-log-state-settings w))
        (and (member (car a) org-todo-keywords-1)
             (push a org-todo-log-states)))))))