[Emacs-diffs] emacs/lisp ChangeLog vc.el

[Dan Nicolaescu]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Dan Nicolaescu <dann>   09/10/24 06:34:30

Modified files:
        lisp           : ChangeLog vc.el 

Log message:
        (vc-backend-for-registration): Rename from
        vc-get-backend-for-registration.  Update callers.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.16499&r2=1.16500
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/vc.el?cvsroot=emacs&r1=1.737&r2=1.738

Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.16499
retrieving revision 1.16500
diff -u -b -r1.16499 -r1.16500
--- ChangeLog   24 Oct 2009 06:32:03 -0000      1.16499
+++ ChangeLog   24 Oct 2009 06:34:26 -0000      1.16500
@@ -1,5 +1,8 @@
 2009-10-24  Dan Nicolaescu  <address@hidden>
 
+       * 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.

Index: vc.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/vc.el,v
retrieving revision 1.737
retrieving revision 1.738
diff -u -b -r1.737 -r1.738
--- vc.el       23 Oct 2009 18:07:41 -0000      1.737
+++ vc.el       24 Oct 2009 06:34:29 -0000      1.738
@@ -794,7 +794,7 @@
 
 ;;; 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 @@
        (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")))))