summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2019-02-10 13:57:40 +0100
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2019-02-10 13:57:40 +0100
commitd4d681cc15be5e32185f5705a55c79f82f8d3245 (patch)
tree9bcf0846577ad16c883266088322bd9d97b49ca9
parent9b3ca51fa4129bcc98f33a22d8e46f39674e082e (diff)
downloadorg-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.el5
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")