summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGerd Moellmann <gerd@gnu.org>2000-01-11 15:36:02 +0000
committerGerd Moellmann <gerd@gnu.org>2000-01-11 15:36:02 +0000
commit57df2446ea6467f956d0de99fdae0c32fa872a7d (patch)
tree5803d6439e3dcfe9fc208d5bb225e6990814b1a6
parentc1356086c3fc3f24c4d277c5532dac9dbfb7c8f4 (diff)
downloademacs-57df2446ea6467f956d0de99fdae0c32fa872a7d.tar.gz
(add-change-log-entry): Insert version number
if having found a current function.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/add-log.el4
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)