|
@@ -3580,8 +3580,8 @@ Return PDF file name or an error if it couldn't be produced."
|
|
|
(if (or (not (file-exists-p pdffile))
|
|
|
;; Only compare times up to whole seconds as some filesystems
|
|
|
;; (e.g. HFS+) do not retain any finer granularity.
|
|
|
- (time-less-p (org-sublist (nth 5 (file-attributes pdffile)) 1 2)
|
|
|
- (org-sublist time 1 2)))
|
|
|
+ (time-less-p (cl-subseq (nth 5 (file-attributes pdffile)) 0 2)
|
|
|
+ (cl-subseq time 0 2)))
|
|
|
(error (format "PDF file %s wasn't produced" pdffile))
|
|
|
;; Else remove log files, when specified, and signal end of
|
|
|
;; process to user, along with any error encountered.
|