diff options
| author | Chong Yidong <cyd@gnu.org> | 2011-10-23 11:38:23 +0800 |
|---|---|---|
| committer | Chong Yidong <cyd@gnu.org> | 2011-10-23 11:38:23 +0800 |
| commit | 86c606818495d9411fd5d6b1477f9a097eb18020 (patch) | |
| tree | 1a9cdb0e26c52d5158b27701e038d7de03c298f3 /lisp/files.el | |
| parent | 53ebff1ff05bc12b35de949801cd5a812e8c1cda (diff) | |
| download | emacs-86c606818495d9411fd5d6b1477f9a097eb18020.tar.gz | |
Make vc-toggle-read-only an alias for toggle-read-only.
It hasn't worked in a VC sense since 2008-05-02T07:12:59Z!esr@snark.thyrsus.com, though this was
not documented at the time (grr).
* lisp/vc/vc-hooks.el (vc-toggle-read-only): Make it an obsolete alias
for toggle-read-only. Note that this hasn't called vc-next-action
since 2008-05-02, though it wasn't documented at the time.
* lisp/files.el (toggle-read-only): Remove obsolete comment about
version control.
* doc/emacs/buffers.texi (Misc Buffer): Don't mention vc-toggle-read-only.
* lisp/cedet/ede.el (ede-maybe-checkout): Function deleted;
vc-toggle-read-only does not do version control now.
* lisp/cedet/ede/project-am.el (project-remove-file, project-add-file)
(project-new-target): Don't call ede-maybe-checkout.
* lisp/cedet/ede/util.el (ede-make-buffer-writable): Don't use
vc-toggle-read-only.
* lisp/vc/ediff-init.el (ediff-toggle-read-only-function): Use
toggle-read-only.
Diffstat (limited to 'lisp/files.el')
| -rw-r--r-- | lisp/files.el | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/lisp/files.el b/lisp/files.el index 6321cff91fd..3ed9bd5a272 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -4700,11 +4700,7 @@ and `view-read-only' is non-nil, enter view mode." (not (eq (get major-mode 'mode-class) 'special))) (view-mode-enter)) (t (setq buffer-read-only (not buffer-read-only)) - (force-mode-line-update))) - (if (memq (vc-backend buffer-file-name) '(RCS SCCS)) - (message "%s" (substitute-command-keys - (concat "File is under version-control; " - "use \\[vc-next-action] to check in/out")))))) + (force-mode-line-update))))) (defun insert-file (filename) "Insert contents of file FILENAME into buffer after point. |