瀏覽代碼

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>
Nicolas Goaziou 6 年之前
父節點
當前提交
d4d681cc15
共有 1 個文件被更改,包括 1 次插入4 次删除
  1. 1 4
      lisp/ox-publish.el

+ 1 - 4
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")