summaryrefslogtreecommitdiff
path: root/lisp/add-log.el
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2007-10-13 05:53:03 +0000
committerMiles Bader <miles@gnu.org>2007-10-13 05:53:03 +0000
commit2b42d458a45eaf9767da327f76a40a1cf9c77c23 (patch)
treef896828e65199d043ea7ab366fffea8bd315a986 /lisp/add-log.el
parent3e88ae627ef8d827b3f79e4e6f14aaad7adfe322 (diff)
parente2cfa9afa691fb8b7a554cb685c16ff3d4e1ff2b (diff)
downloademacs-2b42d458a45eaf9767da327f76a40a1cf9c77c23.tar.gz
Merge from emacs--devo--0
Patches applied: * emacs--devo--0 (patch 880-885) - Remove RCS keywords from doc/misc/cc-mode.texi - Update from CVS Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-264
Diffstat (limited to 'lisp/add-log.el')
-rw-r--r--lisp/add-log.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/add-log.el b/lisp/add-log.el
index 546f87b4e4d..a58d6318670 100644
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -379,7 +379,7 @@ With a numeric prefix ARG, go back ARG comments."
(defun change-log-version-number-search ()
"Return version number of current buffer's file.
-This is the value returned by `vc-workfile-version' or, if that is
+This is the value returned by `vc-working-revision' or, if that is
nil, by matching `change-log-version-number-regexp-list'."
(let* ((size (buffer-size))
(limit
@@ -390,7 +390,7 @@ nil, by matching `change-log-version-number-regexp-list'."
;; Apply percentage only if buffer size is bigger than
;; approx 100 lines.
(if (> size (* 100 80)) (+ (point) (/ size 10)))))
- (or (and buffer-file-name (vc-workfile-version buffer-file-name))
+ (or (and buffer-file-name (vc-working-revision buffer-file-name))
(save-restriction
(widen)
(let ((regexps change-log-version-number-regexp-list)