(add-change-log-entry): Insert version number

if having found a current function.

2 files changed, 7 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2c9180c3e9a..51a7a2145d2 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,4 +1,7 @@
-2000-01-09 Sun  Jari Aalto  <jari.aalto@poboxes.com>
+2000-01-11 Sun  Jari Aalto  <jari.aalto@poboxes.com>
+
+        * add-log.el (add-change-log-entry): Insert version number
+        if having found a current function.
 
         * add-log.el (add-log-current-defun): Call
         `add-log-current-defun-function'.  Try matches at level 0 and
diff --git a/lisp/add-log.el b/lisp/add-log.el
index 30802c4155d..bb911904ad6 100644
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -486,7 +486,9 @@ non-nil, otherwise in local time."
       (if (not (save-excursion
                  (beginning-of-line 1)
                  (looking-at "\\s *\\(\\*\\s *\\)?$")))
-          (insert ": ")))))
+          (insert ": "
+                  (if version
+                      (concat version " ") ))))))
 
 ;;;###autoload
 (defun add-change-log-entry-other-window (&optional whoami file-name)