0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 20:37:51 +00:00

org-persist: Fix expiry check

* lisp/org-persist.el (org-persist--gc-expired-p): Fix incorrect plist
key.
This commit is contained in:
Ihor Radchenko 2022-06-17 19:23:28 +08:00
parent 41b7410a8c
commit 9b00f4bf1d
No known key found for this signature in database
GPG key ID: 6470762A7DA11D8B

View file

@ -344,8 +344,8 @@ FORMAT and ARGS are passed to `message'."
(`nil t)
(`never nil)
((pred numberp)
(when (plist-get ,collection :access-time)
(<= (float-time) (+ (plist-get ,collection :access-time) (* ,cnd 24 60 60)))))
(when (plist-get ,collection :last-access)
(<= (float-time) (+ (plist-get ,collection :last-access) (* ,cnd 24 60 60)))))
((pred functionp)
(funcall ,cnd ,collection))
(_ (error "org-persist: Unsupported expiry type %S" ,cnd))))