From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Wed, 27 Apr 2022 14:09:38 +0000 (+0200)
Subject: Give better error message in dired-toggle-read-only on nonexisting dirs
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~16^2~2370^2~270
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=82fa112e8a6ca5a6b6d160e25134c6c4ab9a0bd7;p=emacs.git

Give better error message in dired-toggle-read-only on nonexisting dirs

* lisp/dired.el (dired-toggle-read-only): Refuse to edit
non-existent directories (bug#23276).
---

diff --git a/lisp/dired.el b/lisp/dired.el
index 2856c5d2435..89fbd52aa62 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -2533,6 +2533,8 @@ If the current buffer can be edited with Wdired, (i.e. the major
 mode is `dired-mode'), call `wdired-change-to-wdired-mode'.
 Otherwise, toggle `read-only-mode'."
   (interactive)
+  (unless (file-exists-p default-directory)
+    (user-error "The current directory no longer exists"))
   (when (and (not (file-writable-p default-directory))
              (not (y-or-n-p
                    "Directory isn't writable; edit anyway? ")))