diff options
| author | Karl Heuer | 1994-02-25 01:42:03 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-02-25 01:42:03 +0000 |
| commit | f450965c2e0778dc1dd0c4a672176d688d0bdd6f (patch) | |
| tree | d24d023925c89cdebcbaaf016fb103d584f857b8 | |
| parent | f765858ec5069407dadc052cf9163200f85d3605 (diff) | |
| download | emacs-f450965c2e0778dc1dd0c4a672176d688d0bdd6f.tar.gz emacs-f450965c2e0778dc1dd0c4a672176d688d0bdd6f.zip | |
(Buffer-menu-toggle-read-only): Change toggle-read-only to
vc-toggle-read-only.
| -rw-r--r-- | lisp/buff-menu.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el index 88e439a0539..a0b45bf64b9 100644 --- a/lisp/buff-menu.el +++ b/lisp/buff-menu.el | |||
| @@ -359,12 +359,12 @@ The current window remains selected." | |||
| 359 | (bury-buffer menu))) | 359 | (bury-buffer menu))) |
| 360 | 360 | ||
| 361 | (defun Buffer-menu-toggle-read-only () | 361 | (defun Buffer-menu-toggle-read-only () |
| 362 | "Toggle read-only status of buffer on this line." | 362 | "Toggle read-only status of buffer on this line, perhaps via version control." |
| 363 | (interactive) | 363 | (interactive) |
| 364 | (let (char) | 364 | (let (char) |
| 365 | (save-excursion | 365 | (save-excursion |
| 366 | (set-buffer (Buffer-menu-buffer t)) | 366 | (set-buffer (Buffer-menu-buffer t)) |
| 367 | (toggle-read-only) | 367 | (vc-toggle-read-only) |
| 368 | (setq char (if buffer-read-only ?% ? ))) | 368 | (setq char (if buffer-read-only ?% ? ))) |
| 369 | (save-excursion | 369 | (save-excursion |
| 370 | (beginning-of-line) | 370 | (beginning-of-line) |