andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(vc-backend-for-registration): Rename from

Browse source 
vc-get-backend-for-registration.  Update callers.
This commit is contained in:
Dan Nicolaescu 2009-10-24 06:34:26 +00:00
parent 905a9ed392
commit a9a2a6db29
2 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -1,5 +1,8 @@
2009-10-24 Dan Nicolaescu <dann@ics.uci.edu>
* vc.el (vc-backend-for-registration): Rename from
vc-get-backend-for-registration. Update callers.
* international/mule-cmds.el (set-language-info-alist): Purecopy lang-env.
(leim-list-header, leim-list-entry-regexp): Change defvars to defconst.
(charset): Purecopy the name.

6
lisp/vc.el
View file

@ -794,7 +794,7 @@ been updated to their corresponding values."
;;; Code for deducing what fileset and backend to assume
(defun vc-get-backend-for-registration (file)
(defun vc-backend-for-registration (file)
"Return a backend that can be used for registering FILE.
If no backend declares itself responsible for FILE, then FILE
@ -913,12 +913,12 @@ current buffer."
(error "Buffer %s is not associated with a file" (buffer-name)))
((and allow-unregistered (not (vc-registered buffer-file-name)))
(if state-model-only-files
(list (vc-get-backend-for-registration (buffer-file-name))
(list (vc-backend-for-registration (buffer-file-name))
(list buffer-file-name)
(list buffer-file-name)
(when state-model-only-files 'unregistered)
nil)
(list (vc-get-backend-for-registration (buffer-file-name))
(list (vc-backend-for-registration (buffer-file-name))
(list buffer-file-name))))
(t (error "No fileset is available here")))))