Function: majutsu-transient-default-value

majutsu-transient-default-value is a natively compiled function defined in majutsu-core.el.

Signature

(majutsu-transient-default-value NAMESPACE MODE CURRENT-PROPERTY DEFAULT-PROPERTY)

Documentation

Return NAMESPACE/MODE's default value.

Precedence is repository-local session value, repository-local saved value, global session value, global saved value, and finally DEFAULT-PROPERTY on MODE.

Source Code

;; Defined in /nix/store/jagqw3nms546pad0gxi5f3wsckk6pji7-emacs-packages-deps/share/emacs/site-lisp/majutsu-core.el
(defun majutsu-transient-default-value (namespace mode current-property default-property)
  "Return NAMESPACE/MODE's default value.

Precedence is repository-local session value, repository-local saved value,
global session value, global saved value, and finally DEFAULT-PROPERTY on MODE."
  (let* ((repo-key (majutsu-transient-repository-default-key namespace mode))
         (repo-current (majutsu-transient-repository-current-entry namespace mode))
         (repo-saved (and repo-key (assq repo-key transient-values)))
         (global-saved (assq (majutsu-transient-global-default-key namespace mode)
                             transient-values)))
    (cond
     (repo-current (cdr repo-current))
     (repo-saved (cdr repo-saved))
     ((plist-member (symbol-plist mode) current-property)
      (get mode current-property))
     (global-saved (cdr global-saved))
     (t
      (get mode default-property)))))