From: Peter Münster Date: Fri, 1 Oct 2021 12:49:28 +0000 (+0200) Subject: New command for unmarking all images in image-dired X-Git-Tag: emacs-29.0.90~3671^2~704 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a2a6c7abcbb5c2776ab5cdbb415df9ad5daa4e13;p=emacs.git New command for unmarking all images in image-dired * lisp/image-dired.el (image-dired-unmark-all-marks): Remove marks from Dired buffer and update the view of the thumbnails (bug#50920). --- diff --git a/etc/NEWS b/etc/NEWS index 18eb248b265..3892ba2c797 100644 --- a/etc/NEWS +++ b/etc/NEWS @@ -54,6 +54,13 @@ This change also affects 'cl-macrolet', 'cl-flet*' and * Changes in Specialized Modes and Packages in Emacs 29.1 +** image-dired + +--- +*** New command for the thumbnail buffer. +The new command 'image-dired-unmark-all-marks' has been added with a +binding in the menu. + * New Modes and Packages in Emacs 29.1 diff --git a/lisp/image-dired.el b/lisp/image-dired.el index 3ca47300a99..ec3f988bfbb 100644 --- a/lisp/image-dired.el +++ b/lisp/image-dired.el @@ -1433,6 +1433,14 @@ dired." (interactive) (image-dired-modify-mark-on-thumb-original-file 'toggle)) +(defun image-dired-unmark-all-marks () + "Remove all marks from all files. +Do this in the Dired buffer and update this thumbnail buffer." + (interactive) + (with-current-buffer (image-dired-associated-dired-buffer) + (dired-unmark-all-marks)) + (image-dired-thumb-update-marks)) + (defun image-dired-jump-original-dired-buffer () "Jump to the dired buffer associated with the current image file. You probably want to use this together with @@ -1536,6 +1544,7 @@ You probably want to use this together with ["Quit" quit-window] ["Delete thumbnail from buffer" image-dired-delete-char] ["Delete marked images" image-dired-delete-marked] + ["Unmark all marks" image-dired-unmark-all-marks] ["Remove tag from current or marked thumbnails" image-dired-tag-thumbnail-remove] ["Tag current or marked thumbnails" image-dired-tag-thumbnail]