emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/org-contrib bb51b4d688: lisp/org-screenshot.el (org-screen


From: ELPA Syncer
Subject: [nongnu] elpa/org-contrib bb51b4d688: lisp/org-screenshot.el (org-screenshot-rotation-init): Fix obsolete calls
Date: Mon, 1 Jan 2024 06:59:59 -0500 (EST)

branch: elpa/org-contrib
commit bb51b4d688779f5c1f3d5ae7cefb2892f9bac967
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    lisp/org-screenshot.el (org-screenshot-rotation-init): Fix obsolete calls
---
 lisp/org-screenshot.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/org-screenshot.el b/lisp/org-screenshot.el
index 6721667a8d..127aef3731 100644
--- a/lisp/org-screenshot.el
+++ b/lisp/org-screenshot.el
@@ -345,9 +345,9 @@ by most recent first"
                      (let ((mtime1 (nth 5 (file-attributes file1)))
                            (mtime2 (nth 5 (file-attributes file2))))
                        (setq mtime1 (+ (ash (first mtime1) 16)
-                                       (second mtime1)))
+                                       (cl-second mtime1)))
                        (setq mtime2 (+ (ash (first mtime2) 16)
-                                       (second mtime2)))
+                                       (cl-second mtime2)))
                        (> mtime1 mtime2)))))))
   (let ((n -1) (list org-screenshot-file-list))
     (while (and list (not (equal (pop list) lastfile)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]