Emacs: Update function name

This commit is contained in:
Riyyi
2023-11-02 20:44:47 +01:00
parent 484fa668de
commit 94f59f5b31
+3 -3
View File
@@ -78,8 +78,8 @@ When ANYWHERE is non-nil, search beyond the preamble."
t)
(point)))))
(defun dot/org-set-file-time-property (property value)
"Set the file time PROPERTY in the preamble."
(defun dot/org-set-file-property (property value)
"Set the file PROPERTY in the preamble."
(when-let ((pos (dot/org-find-file-property property)))
(save-excursion
(goto-char pos)
@@ -92,7 +92,7 @@ When ANYWHERE is non-nil, search beyond the preamble."
(defun dot/org-set-last-modified ()
"Update the LAST_MODIFIED file property in the preamble."
(when (derived-mode-p 'org-mode)
(dot/org-set-file-time-property "LAST_MODIFIED"
(dot/org-set-file-property "LAST_MODIFIED"
(format-time-string "[%Y-%m-%d %a %H:%M]")))))))
;; Org agenda.