Mercurial > emacs
comparison lisp/vc-svn.el @ 99159:b0dce7f34dda
* vc.el: Rename VC methods that were missed when vc-status was
renamed to vc-dir.
* vc-svn.el (vc-svn-dir-extra-headers): Rename from
vc-svn-status-extra-headers.
* vc-hg.el (vc-hg-dir-printer): Rename from vc-hg-status-printer.
(vc-hg-dir-extra-header): Rename from vc-hg-status-extra-headers.
* vc-git.el (vc-git-dir-printer): Rename from vc-dir-status-printer.
(vc-git-dir-extra-headers): Rename from vc-git-status-extra-headers.
* vc-dir.el (vc-dir-mode): Use vc-dir-printer instead of
vc-dir-status-printer.
(vc-dir-headers): Use `dir-extra-headers' instead of
`status-extra-headers'
(vc-dir-printer): Rename from vc-dir-status-printer.
(vc-default-dir-extra-headers): Rename from
vc-default-status-extra-headers.
* vc-cvs.el (vc-cvs-dir-extra-headers): Rename from
vc-cvs-status-extra-headers.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Mon, 27 Oct 2008 07:21:43 +0000 |
| parents | 2cae4bd13e67 |
| children | 847ff1d1650c |
comparison
equal
deleted
inserted
replaced
| 99158:d1d986962044 | 99159:b0dce7f34dda |
|---|---|
| 190 (defun vc-svn-dir-status-files (dir files default-state callback) | 190 (defun vc-svn-dir-status-files (dir files default-state callback) |
| 191 (apply 'vc-svn-command (current-buffer) 'async nil "status" files) | 191 (apply 'vc-svn-command (current-buffer) 'async nil "status" files) |
| 192 (vc-exec-after | 192 (vc-exec-after |
| 193 `(vc-svn-after-dir-status (quote ,callback)))) | 193 `(vc-svn-after-dir-status (quote ,callback)))) |
| 194 | 194 |
| 195 (defun vc-svn-status-extra-headers (dir) | 195 (defun vc-svn-dir-extra-headers (dir) |
| 196 "Generate extra status headers for a Subversion working copy." | 196 "Generate extra status headers for a Subversion working copy." |
| 197 (vc-svn-command "*vc*" 0 nil "info") | 197 (vc-svn-command "*vc*" 0 nil "info") |
| 198 (let ((repo | 198 (let ((repo |
| 199 (save-excursion | 199 (save-excursion |
| 200 (and (progn | 200 (and (progn |