* lisp/org-element.el: Fix checkdoc warnings

(org-element--cache-persist-after-read): Make docstring less than 80
columns wide.
* lisp/org-persist.el (org-persist-load): Document all the function
arguments.
This commit is contained in:
Ihor Radchenko 2023-11-13 11:28:55 +02:00
parent d285f72f9d
commit 5bbd58d34f
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
2 changed files with 5 additions and 3 deletions

View File

@ -7631,8 +7631,9 @@ consistent with the cache."
(defun org-element--cache-persist-after-read (container &optional associated) (defun org-element--cache-persist-after-read (container &optional associated)
"Setup restored cache for CONTAINER and ASSOCIATED. "Setup restored cache for CONTAINER and ASSOCIATED.
Re-fill :buffer properties for cache elements (buffer objects cannot be written onto disk). Re-fill :buffer properties for cache elements (buffer objects cannot
Also, perform some consistency checks to prevent loading corrupted cache." be written onto disk). Also, perform some consistency checks to
prevent loading corrupted cache."
(when (and (plist-get associated :file) (when (and (plist-get associated :file)
(get-file-buffer (plist-get associated :file))) (get-file-buffer (plist-get associated :file)))
(with-current-buffer (get-file-buffer (plist-get associated :file)) (with-current-buffer (get-file-buffer (plist-get associated :file))

View File

@ -1036,7 +1036,8 @@ CONTAINER as well. For example:
(cl-defun org-persist-load (container &optional associated hash-must-match &key read-related) (cl-defun org-persist-load (container &optional associated hash-must-match &key read-related)
"Load CONTAINER data for ASSOCIATED. "Load CONTAINER data for ASSOCIATED.
The arguments have the same meaning as in `org-persist-read'." The arguments CONTAINER, ASSOCIATED, HASH-MUST-MATCH, and READ-RELATED
have the same meaning as in `org-persist-read'."
(org-persist-read container associated hash-must-match t :read-related read-related)) (org-persist-read container associated hash-must-match t :read-related read-related))
(defun org-persist-load-all (&optional associated) (defun org-persist-load-all (&optional associated)