diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-04-27 16:09:38 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-04-27 16:09:38 +0200 |
commit | 82fa112e8a6ca5a6b6d160e25134c6c4ab9a0bd7 (patch) | |
tree | 5b1bb33984bc1b6d18183ab0cd0df760512685a9 /lisp/dired.el | |
parent | 0beb8fd663663dcaa1bda4df5995d10f1ef615fb (diff) | |
download | emacs-82fa112e8a6ca5a6b6d160e25134c6c4ab9a0bd7.tar.gz emacs-82fa112e8a6ca5a6b6d160e25134c6c4ab9a0bd7.tar.bz2 emacs-82fa112e8a6ca5a6b6d160e25134c6c4ab9a0bd7.zip |
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).
Diffstat (limited to 'lisp/dired.el')
-rw-r--r-- | lisp/dired.el | 2 |
1 files changed, 2 insertions, 0 deletions
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? "))) |