mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 18:40:39 -08:00
Make dired-toggle-read-only check whether the directory is writable
* lisp/dired.el (dired-toggle-read-only): Check that the directory is writable (bug#29412).
This commit is contained in:
parent
204d151940
commit
f6cafe6574
1 changed files with 2 additions and 0 deletions
|
|
@ -2419,6 +2419,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-writable-p default-directory)
|
||||
(user-error "Directory %s isn't writeable" default-directory))
|
||||
(if (derived-mode-p 'dired-mode)
|
||||
(wdired-change-to-wdired-mode)
|
||||
(read-only-mode 'toggle)))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue