diff options
| author | Eric S. Raymond <esr@thyrsus.com> | 2014-11-20 03:52:24 -0500 |
|---|---|---|
| committer | Eric S. Raymond <esr@thyrsus.com> | 2014-11-20 03:52:24 -0500 |
| commit | e7e9dbccb05175a512c40a3f433887c40abaa469 (patch) | |
| tree | 551b1a5015334f0a553d7873a1b7b45c4e52aaf2 /lisp/vc/vc-svn.el | |
| parent | f83109f0fabe13c0175ca6fe23b475bd8a9d9d99 (diff) | |
| download | emacs-e7e9dbccb05175a512c40a3f433887c40abaa469.tar.gz | |
Remove editable argument from VC's backend checkout methods.
Alters vc/vc-bzr.el, vc/vc-cvs.el, vc/vc-dav.el, vc/vc-git.el,
vc/vc-hg.el, vc/vc-mtn.el, vc/vc-rcs.el, vc/vc-sccs.el,
vc/vc-svn.el, vc/vc.el.
where this matters (which is only in SCCS and RCS) files are now always
checked out editable. This may actually have been dynamically true
already - it looks like the vc-next-action code evolved past visiting
the other case. Tested with RCS.
Diffstat (limited to 'lisp/vc/vc-svn.el')
| -rw-r--r-- | lisp/vc/vc-svn.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/vc/vc-svn.el b/lisp/vc/vc-svn.el index bd22fbf6a16..30d66e45be0 100644 --- a/lisp/vc/vc-svn.el +++ b/lisp/vc/vc-svn.el @@ -375,14 +375,14 @@ FILE is a file wildcard, relative to the root directory of DIRECTORY." "Return the administrative directory of FILE." (expand-file-name vc-svn-admin-directory (vc-svn-root file))) -(defun vc-svn-checkout (file &optional editable rev) +(defun vc-svn-checkout (file &optional rev) (message "Checking out %s..." file) (with-current-buffer (or (get-file-buffer file) (current-buffer)) - (vc-svn-update file editable rev (vc-switches 'SVN 'checkout))) + (vc-svn-update file rev (vc-switches 'SVN 'checkout))) (vc-mode-line file 'SVN) (message "Checking out %s...done" file)) -(defun vc-svn-update (file _editable rev switches) +(defun vc-svn-update (file rev switches) (if (and (file-exists-p file) (not rev)) ;; If no revision was specified, there's nothing to do. nil |