From c6b25b55b33d1c558abdc7b4d0c14fc9f17b65f4 Mon Sep 17 00:00:00 2001 From: Morgan Smith Date: Thu, 8 Sep 2022 02:09:52 +0200 Subject: [PATCH] Make image-dired-rotate-original-{left,right} respect marks * lisp/image/image-dired.el (image-dired-rotate-original-left) (image-dired-rotate-original-right): Rotate all marked files. (Bug#57651) --- lisp/image/image-dired.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/image/image-dired.el b/lisp/image/image-dired.el index 88f4ceaffb4..923efa8145e 100644 --- a/lisp/image/image-dired.el +++ b/lisp/image/image-dired.el @@ -1126,7 +1126,8 @@ and a confirmation is needed before the original image files is overwritten. This confirmation can be turned off using `image-dired-rotate-original-ask-before-overwrite'." (interactive nil image-dired-thumbnail-mode) - (image-dired-rotate-original "270")) + (image-dired--with-marked + (image-dired-rotate-original "270"))) (defun image-dired-rotate-original-right () "Rotate original image right (clockwise) 90 degrees. @@ -1135,7 +1136,8 @@ and a confirmation is needed before the original image files is overwritten. This confirmation can be turned off using `image-dired-rotate-original-ask-before-overwrite'." (interactive nil image-dired-thumbnail-mode) - (image-dired-rotate-original "90")) + (image-dired--with-marked + (image-dired-rotate-original "90"))) (defun image-dired-display-next-thumbnail-original (&optional arg) "Move to the next image in the thumbnail buffer and display it. -- 2.39.2