Make image-dired-delete-marked more resilient

* lisp/image-dired.el (image-dired-delete-marked): Don't bug out
on empty buffers (bug#53385).

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/image-dired.el b/lisp/image-dired.el
index b81df8567bd..9b0bbb70df9 100644
--- a/lisp/image-dired.el
+++ b/lisp/image-dired.el
@@ -2353,7 +2353,8 @@ for deletion instead."
   (interactive)
   (image-dired--with-marked
    (image-dired-delete-char)
-   (backward-char))
+   (unless (bobp)
+     (backward-char)))
   (image-dired--line-up-with-method)
   (with-current-buffer (image-dired-associated-dired-buffer)
     (dired-do-delete)))