Name change in preparation for ripping out vc-dired.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1611fec08b148edeeba62d24ab828dfcb105bcac..12d862bcc47a198de1fd7d62d09c3aad82e3ac3e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2008-05-02  Eric S. Raymond  <esr@snark.thyrsus.com>
+
+       * vc.el (vc-default-dired-state-info): Change name of primitive
+       to prettify-state-info, in preparation for ripping out dired mode.
+       * vc-bzr.el (vc-bzr-dired-state-info): Change name of primitive
+       to prettify-state-info, in preparation for ripping out dired mode.
+
 2008-05-02  Dan Nicolaescu  <dann@ics.uci.edu>
 
        * vc-rcs.el (vc-rcs-state): Fix typos.
@@ -33,14 +40,14 @@
        * vc.el (vc-default-dired-state): Change needs-patch state to
        needs-update, since the name now shows up in dir-status listings
        and was somewhat misleading.
-       * vc-cvs.el (vc-cvs-delete-file) Don't do a "cvs commit"
+       * vc-cvs.el (vc-cvs-delete-file): Don't do a "cvs commit"
        immediately after removing the file.
        * vc.el (vc-next-action): More informative messages when a fileset
        is in a mixed state or files are missing.
 
 2008-05-01  Sam Steingold  <sds@gnu.org>
 
-       * vc.el (vc-delete-file): Check if the file has uncommitted changed.
+       * vc.el (vc-delete-file): Check if the file has uncommitted changes.
 
 2008-05-01  Stefan Monnier  <monnier@iro.umontreal.ca>
 

diff --git a/lisp/vc-bzr.el b/lisp/vc-bzr.el
index 65e8212c34f9a78936b203f89ef41d1b97c7c788..15529e20f0c7fd4543668da6365dd0ff19355010 100644 (file)
--- a/lisp/vc-bzr.el
+++ b/lisp/vc-bzr.el
@@ -647,13 +647,13 @@ Optional argument LOCALP is always ignored."
           (setq current-vc-state nil)
           (setq current-bzr-state nil)))))))
 
-(defun vc-bzr-dired-state-info (file)
-  "Bzr-specific version of `vc-dired-state-info'."
+(defun vc-bzr-prettify-state-info (file)
+  "Bzr-specific version of `vc-prettify-state-info'."
   (if (eq 'edited (vc-state file))
         (concat "(" (symbol-name (or (vc-file-getprop file 'vc-bzr-state) 
                                      'edited)) ")")
     ;; else fall back to default vc.el representation
-    (vc-default-dired-state-info 'Bzr file)))
+    (vc-default-prettify-state-info 'Bzr file)))
 
 ;; XXX: this needs testing, it's probably incomplete. 
 (defun vc-bzr-after-dir-status (update-function)

diff --git a/lisp/vc-git.el b/lisp/vc-git.el
index 0c718cb8677631fc55950ab77814943b92e2f24a..9c8ebfc9993bfd92b3ac215ce5ba1b77dfa3fa0b 100644 (file)
--- a/lisp/vc-git.el
+++ b/lisp/vc-git.el
@@ -58,7 +58,7 @@
 ;; * checkout-model (file)                        OK
 ;; - workfile-unchanged-p (file)                  OK
 ;; - mode-line-string (file)                      OK
-;; - dired-state-info (file)                      OK
+;; - prettify-state-info (file)                           OK
 ;; STATE-CHANGING FUNCTIONS
 ;; * create-repo ()                               OK
 ;; * register (files &optional rev comment)       OK

diff --git a/lisp/vc-hg.el b/lisp/vc-hg.el
index 44ffa95a92f319d34ca87d6dc7eb13bbb289f0fd..59aba1cc2a7d15315a941d4f67789f35d397d1c6 100644 (file)
--- a/lisp/vc-hg.el
+++ b/lisp/vc-hg.el
@@ -50,7 +50,7 @@
 ;; * checkout-model (file)                     OK
 ;; - workfile-unchanged-p (file)               OK
 ;; - mode-line-string (file)                   NOT NEEDED
-;; - dired-state-info (file)                   OK
+;; - prettify-state-info (file)                OK
 ;; STATE-CHANGING FUNCTIONS
 ;; * register (files &optional rev comment)    OK
 ;; * create-repo ()                            OK

diff --git a/lisp/vc.el b/lisp/vc.el
index a56b281122b204b9fbab51d3117179b0afab813b..ae575985f1ae6917540f337f14e8ca331af3ef1c 100644 (file)
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -254,10 +254,10 @@
 ;;   The default implementation deals well with all states that
 ;;   `vc-state' can return.
 ;;
-;; - dired-state-info (file)
+;; - prettify-state-info (file)
 ;;
 ;;   Translate the `vc-state' property of FILE into a string that can be
-;;   used in a vc-dired buffer.  The default implementation deals well
+;;   used in a human-readable buffer.  The default implementation deals well
 ;;   with all states that `vc-state' can return.
 ;;
 ;; STATE-CHANGING FUNCTIONS
@@ -674,6 +674,9 @@
 ;; - backends that care about vc-stay-local should try to take it into
 ;;   account for vc-dir.  Is this likely to be useful???
 ;;
+;; - vc-dir listing needs a footer generated when it's done to make it obvious
+;; that it has finished.
+;;
 ;;; Code:
 
 (require 'vc-hooks)
@@ -2678,7 +2681,7 @@ Called by dired after any portion of a vc-dired buffer has been read in."
            (forward-line 1)))
         ;; Either we're in non-terse mode or it's out of date
         ((not (and vc-dired-terse-mode (vc-up-to-date-p filename)))
-         (vc-dired-reformat-line (vc-call dired-state-info filename))
+         (vc-dired-reformat-line (vc-call prettify-state-info filename))
          (forward-line 1))
         ;; Remaining cases are under version control but uninteresting
         (t
@@ -4256,7 +4259,7 @@ to provide the `find-revision' operation instead."
            (insert-file-contents-literally tmpfile)))
       (delete-file tmpfile))))
 
-(defun vc-default-dired-state-info (backend file)
+(defun vc-default-prettify-state-info (backend file)
   (let* ((state (vc-state file))
        (statestring
         (cond