[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-26 c63b344: Fix range-error in image-dired.el
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] emacs-26 c63b344: Fix range-error in image-dired.el |
Date: |
Mon, 16 Oct 2017 12:26:23 -0400 (EDT) |
branch: emacs-26
commit c63b344c3d5f6278a189a16099ee6310fad9fbd7
Author: Eli Zaretskii <address@hidden>
Commit: Eli Zaretskii <address@hidden>
Fix range-error in image-dired.el
* lisp/image-dired.el (image-dired-create-thumb-1): Avoid
overflowing an Emacs integer on 32-bit hosts. (Bug#28809)
---
lisp/image-dired.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/lisp/image-dired.el b/lisp/image-dired.el
index f48f1a1..30ecc2b 100644
--- a/lisp/image-dired.el
+++ b/lisp/image-dired.el
@@ -748,7 +748,10 @@ Increase at own risk.")
'image-dired-cmd-create-thumbnail-program)
(let* ((width (int-to-string (image-dired-thumb-size 'width)))
(height (int-to-string (image-dired-thumb-size 'height)))
- (modif-time (floor (float-time (nth 5 (file-attributes
original-file)))))
+ (modif-time
+ (format "%.0f"
+ (ffloor (float-time
+ (nth 5 (file-attributes original-file))))))
(thumbnail-nq8-file (replace-regexp-in-string ".png\\'" "-nq8.png"
thumbnail-file))
(spec
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-26 c63b344: Fix range-error in image-dired.el,
Eli Zaretskii <=