summaryrefslogtreecommitdiff
path: root/lisp/dired.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/dired.el')
-rw-r--r--lisp/dired.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/dired.el b/lisp/dired.el
index a80f48fa0c2..3aa0088a699 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -1961,9 +1961,9 @@ If the current buffer can be edited with Wdired, (i.e. the major
mode is `dired-mode'), call `wdired-change-to-wdired-mode'.
Otherwise, call `toggle-read-only'."
(interactive)
- (if (eq major-mode 'dired-mode)
+ (if (derived-mode-p 'dired-mode)
(wdired-change-to-wdired-mode)
- (toggle-read-only nil t)))
+ (call-interactively 'toggle-read-only)))
(defun dired-next-line (arg)
"Move down lines then position at filename.