diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2019-02-10 13:57:40 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2019-02-10 13:57:40 +0100 |
commit | d4d681cc15be5e32185f5705a55c79f82f8d3245 (patch) | |
tree | 9bcf0846577ad16c883266088322bd9d97b49ca9 | |
parent | 9b3ca51fa4129bcc98f33a22d8e46f39674e082e (diff) | |
download | org-mode-d4d681cc15be5e32185f5705a55c79f82f8d3245.tar.gz |
ox-publish: Fix previous patch
* lisp/ox-publish.el (org-publish-cache-file-needs-publishing): Remove
unnecessary code, since `time-less-p' also handles integers.
Reported-by: Paul Eggert <eggert@cs.ucla.edu>
<http://lists.gnu.org/r/emacs-orgmode/2019-02/msg00074.html>
-rw-r--r-- | lisp/ox-publish.el | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/ox-publish.el b/lisp/ox-publish.el index b5c283f..5c6ad94 100644 --- a/lisp/ox-publish.el +++ b/lisp/ox-publish.el @@ -1285,10 +1285,7 @@ the file including them will be republished as well." (error "`org-publish-cache-file-needs-publishing' called, but no cache present")) (let* ((key (org-publish-timestamp-filename filename pub-dir pub-func)) - (pstamp (pcase (org-publish-cache-get key) - ;; Old format, convert it back to a time value. - ((and stamp (pred wholenump)) (seconds-to-time stamp)) - (stamp stamp))) + (pstamp (org-publish-cache-get key)) (org-inhibit-startup t) included-files-ctime) (when (equal (file-name-extension filename) "org") |