From 51c4474efc354c0e1ecc06c3014e06a3eca9682a Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Sun, 23 Sep 2012 01:57:11 +0300 Subject: [PATCH] * lisp/dired.el (dired-mode-map): Add [remap read-only-mode] for `dired-toggle-read-only'. Fixes: debbugs:12462 --- lisp/ChangeLog | 5 +++++ lisp/dired.el | 2 ++ 2 files changed, 7 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 587e60b2d57..351b6ea6cb8 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2012-09-22 Juri Linkov + + * dired.el (dired-mode-map): Add [remap read-only-mode] for + `dired-toggle-read-only'. (Bug#12462) + 2012-09-22 Martin Rudalics * subr.el (temp-output-buffer-show): New function. diff --git a/lisp/dired.el b/lisp/dired.el index a5169fc301c..6defd6c4877 100644 --- a/lisp/dired.el +++ b/lisp/dired.el @@ -1493,6 +1493,8 @@ Do so according to the former subdir alist OLD-SUBDIR-ALIST." (define-key map (kbd "M-s f C-s") 'dired-isearch-filenames) (define-key map (kbd "M-s f M-C-s") 'dired-isearch-filenames-regexp) ;; misc + (define-key map [remap read-only-mode] 'dired-toggle-read-only) + ;; `toggle-read-only' is an obsolete alias for `read-only-mode' (define-key map [remap toggle-read-only] 'dired-toggle-read-only) (define-key map "?" 'dired-summary) (define-key map "\177" 'dired-unmark-backward) -- 2.39.2