(vc-comment-to-change-log): Load add-log before binding

add-log-current-defun-function.

diff --git a/lisp/vc.el b/lisp/vc.el
index 59054fa182644624f99bf0e34b138f7735de3d25..896e126d17894fdc68b45e6e69eb025c5d12de3a 100644 (file)
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -617,6 +617,9 @@ If nil, uses `change-log-default-name'."
   (interactive (if current-prefix-arg
                   (list current-prefix-arg
                         (prompt-for-change-log-name))))
+  ;; Make sure the defvar for add-log-current-defun-function has been executed
+  ;; before binding it.
+  (require 'add-log)
   (let (;; Extract the comment first so we get any error before doing anything.
        (comment (ring-ref vc-comment-ring 0))
        ;; Don't let add-change-log-entry insert a defun name.