aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDan Nicolaescu2009-10-24 06:34:26 +0000
committerDan Nicolaescu2009-10-24 06:34:26 +0000
commita9a2a6db29a6aef761527d9b5ce776410575669e (patch)
tree8ea26dabddce4fa6c6229404d083df1f45b9ec0d
parent905a9ed3923847f0323b5ad6f2e26558336fe9c0 (diff)
downloademacs-a9a2a6db29a6aef761527d9b5ce776410575669e.tar.gz
emacs-a9a2a6db29a6aef761527d9b5ce776410575669e.zip
(vc-backend-for-registration): Rename from
vc-get-backend-for-registration. Update callers.
-rw-r--r--lisp/ChangeLog3
-rw-r--r--lisp/vc.el6
2 files changed, 6 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a9e21b1c251..8a41ef8d171 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
12009-10-24 Dan Nicolaescu <dann@ics.uci.edu> 12009-10-24 Dan Nicolaescu <dann@ics.uci.edu>
2 2
3 * vc.el (vc-backend-for-registration): Rename from
4 vc-get-backend-for-registration. Update callers.
5
3 * international/mule-cmds.el (set-language-info-alist): Purecopy lang-env. 6 * international/mule-cmds.el (set-language-info-alist): Purecopy lang-env.
4 (leim-list-header, leim-list-entry-regexp): Change defvars to defconst. 7 (leim-list-header, leim-list-entry-regexp): Change defvars to defconst.
5 (charset): Purecopy the name. 8 (charset): Purecopy the name.
diff --git a/lisp/vc.el b/lisp/vc.el
index e2ddb4f07be..19033c214d8 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -794,7 +794,7 @@ been updated to their corresponding values."
794 794
795;;; Code for deducing what fileset and backend to assume 795;;; Code for deducing what fileset and backend to assume
796 796
797(defun vc-get-backend-for-registration (file) 797(defun vc-backend-for-registration (file)
798 "Return a backend that can be used for registering FILE. 798 "Return a backend that can be used for registering FILE.
799 799
800If no backend declares itself responsible for FILE, then FILE 800If no backend declares itself responsible for FILE, then FILE
@@ -913,12 +913,12 @@ current buffer."
913 (error "Buffer %s is not associated with a file" (buffer-name))) 913 (error "Buffer %s is not associated with a file" (buffer-name)))
914 ((and allow-unregistered (not (vc-registered buffer-file-name))) 914 ((and allow-unregistered (not (vc-registered buffer-file-name)))
915 (if state-model-only-files 915 (if state-model-only-files
916 (list (vc-get-backend-for-registration (buffer-file-name)) 916 (list (vc-backend-for-registration (buffer-file-name))
917 (list buffer-file-name) 917 (list buffer-file-name)
918 (list buffer-file-name) 918 (list buffer-file-name)
919 (when state-model-only-files 'unregistered) 919 (when state-model-only-files 'unregistered)
920 nil) 920 nil)
921 (list (vc-get-backend-for-registration (buffer-file-name)) 921 (list (vc-backend-for-registration (buffer-file-name))
922 (list buffer-file-name)))) 922 (list buffer-file-name))))
923 (t (error "No fileset is available here"))))) 923 (t (error "No fileset is available here")))))
924 924