diff options
| author | Miles Bader <miles@gnu.org> | 2007-08-03 04:57:05 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2007-08-03 04:57:05 +0000 |
| commit | 1eb8b988bb9aee96d40b9115f02b249b249c33ef (patch) | |
| tree | 3ac180dde6971da369749fefe3ba6fe381837132 /lisp/vc-hg.el | |
| parent | 1fad91a4234f6824227d9d066f836408273617e7 (diff) | |
| download | emacs-1eb8b988bb9aee96d40b9115f02b249b249c33ef.tar.gz | |
Change capitalization of VC backend names for new backends
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-842
Diffstat (limited to 'lisp/vc-hg.el')
| -rw-r--r-- | lisp/vc-hg.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/vc-hg.el b/lisp/vc-hg.el index d8a7ec0dd46..1415f8d9499 100644 --- a/lisp/vc-hg.el +++ b/lisp/vc-hg.el @@ -256,7 +256,7 @@ (defvar log-view-file-re) (defvar log-view-font-lock-keywords) -(define-derived-mode vc-hg-log-view-mode log-view-mode "HG-Log-View" +(define-derived-mode vc-hg-log-view-mode log-view-mode "Hg-Log-View" (require 'add-log) ;; we need the faces add-log ;; Don't have file markers, so use impossible regexp. (set (make-local-variable 'log-view-file-re) "^File:[ \t]+\\(.+\\)") @@ -399,7 +399,7 @@ COMMENT is ignored." ;; (vc-hg-command nil nil file "remove")) (defun vc-hg-checkin (files rev comment) - "HG-specific version of `vc-backend-checkin'. + "Hg-specific version of `vc-backend-checkin'. REV is ignored." (vc-hg-command nil 0 files "commit" "-m" comment)) @@ -436,7 +436,7 @@ REV is the revision to check out into WORKFILE." (if (equal (vc-workfile-version file) "0") "(added)" "(modified)") ;; fall back to the default VC representation - (vc-default-dired-state-info 'HG file)))) + (vc-default-dired-state-info 'Hg file)))) ;; Modelled after the similar function in vc-bzr.el (defun vc-hg-revert (file &optional contents-done) |