From 2bfa42855bf0278497f2e4540eac2086dab254c3 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sun, 22 Oct 2017 00:29:04 -0700 Subject: [PATCH] Fix xdg timestamp error on 32-bit Emacs * lisp/xdg.el (xdg-thumb-mtime): Return an Emacs timestamp, not an integer. This avoids signaling an error on 32-bit Emacs, where timestamps typically do not fit into fixnums (Bug#28921). --- lisp/xdg.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/xdg.el b/lisp/xdg.el index 76106f42586..e73e6199d6f 100644 --- a/lisp/xdg.el +++ b/lisp/xdg.el @@ -93,8 +93,8 @@ file:///foo/bar.jpg" (concat (md5 (xdg-thumb-uri filename)) ".png")) (defun xdg-thumb-mtime (filename) - "Return modification time of FILENAME as integral seconds from the epoch." - (floor (float-time (nth 5 (file-attributes filename))))) + "Return modification time of FILENAME as an Emacs timestamp." + (file-attribute-modification-time (file-attributes filename))) ;; XDG User Directories -- 2.11.4.GIT