summaryrefslogtreecommitdiff
path: root/lisp/image-dired.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/image-dired.el')
-rw-r--r--lisp/image-dired.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/image-dired.el b/lisp/image-dired.el
index 1e1614af9b6..9455ab1ff08 100644
--- a/lisp/image-dired.el
+++ b/lisp/image-dired.el
@@ -2313,14 +2313,14 @@ non-nil."
(image-dired-dired-file-marked-p))))))
(defun image-dired-delete-marked ()
- "Delete marked thumbnails and associated images."
+ "Delete current or marked thumbnails and associated images."
(interactive)
+ (with-current-buffer (image-dired-associated-dired-buffer)
+ (dired-do-delete))
(image-dired--with-marked
(image-dired-delete-char)
(backward-char))
- (image-dired--line-up-with-method)
- (with-current-buffer (image-dired-associated-dired-buffer)
- (dired-do-delete)))
+ (image-dired--line-up-with-method))
(defun image-dired-thumb-update-marks ()
"Update the marks in the thumbnail buffer."