branch: elpa/org-contrib
commit bb51b4d688779f5c1f3d5ae7cefb2892f9bac967
Author: Ihor Radchenko <[email protected]>
Commit: Ihor Radchenko <[email protected]>
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)))
