[elpa] externals/org 1c54d75cca 1/3: org-persist--gc-expired-p: Fix expiry check

[ELPA Syncer]

branch: externals/org
commit 1c54d75cca975671b5ed95a4dc056b2949de5ed7
Author: Ihor Radchenko <yantar92@gmail.com>
Commit: Ihor Radchenko <yantar92@gmail.com>

    org-persist--gc-expired-p: Fix expiry check
    
    * lisp/org-persist.el (org-persist--gc-expired-p): Fix comparison when
    expiry date is set to number of days.  The old code flipped the check
    and treated all the recent entries as expired.
---
 lisp/org-persist.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/org-persist.el b/lisp/org-persist.el
index 547004025f..2d5b804468 100644
--- a/lisp/org-persist.el
+++ b/lisp/org-persist.el
@@ -345,7 +345,7 @@ FORMAT and ARGS are passed to `message'."
      (`never nil)
      ((pred numberp)
       (when (plist-get ,collection :last-access)
-        (<= (float-time) (+ (plist-get ,collection :last-access) (* ,cnd 24 60 
60)))))
+        (> (float-time) (+ (plist-get ,collection :last-access) (* ,cnd 24 60 
60)))))
      ((pred functionp)
       (funcall ,cnd ,collection))
      (_ (error "org-persist: Unsupported expiry type %S" ,cnd))))