aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2004-03-19 00:48:51 +0000
committerStefan Monnier2004-03-19 00:48:51 +0000
commitdd816e0df87d4eb5d7f2e5e6e2b0416588cb6df0 (patch)
tree4c1224147f782103d06a5ac04c55e789895f5537
parentda06e4d71b0b5f9522126f180bd4888771995608 (diff)
downloademacs-dd816e0df87d4eb5d7f2e5e6e2b0416588cb6df0.tar.gz
emacs-dd816e0df87d4eb5d7f2e5e6e2b0416588cb6df0.zip
(add-change-log-entry): Simplify.
-rw-r--r--lisp/add-log.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/add-log.el b/lisp/add-log.el
index e6ec96baa74..609dfde5f65 100644
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -1,6 +1,6 @@
1;;; add-log.el --- change log maintenance commands for Emacs 1;;; add-log.el --- change log maintenance commands for Emacs
2 2
3;; Copyright (C) 1985, 86, 88, 93, 94, 97, 98, 2000, 2003 3;; Copyright (C) 1985, 86, 88, 93, 94, 97, 98, 2000, 03, 2004
4;; Free Software Foundation, Inc. 4;; Free Software Foundation, Inc.
5 5
6;; Maintainer: FSF 6;; Maintainer: FSF
@@ -489,8 +489,7 @@ non-nil, otherwise in local time."
489 (funcall add-log-buffer-file-name-function) 489 (funcall add-log-buffer-file-name-function)
490 buffer-file-name)) 490 buffer-file-name))
491 (buffer-file (if buf-file-name (expand-file-name buf-file-name))) 491 (buffer-file (if buf-file-name (expand-file-name buf-file-name)))
492 (file-name (expand-file-name 492 (file-name (expand-file-name (find-change-log file-name buffer-file)))
493 (or file-name (find-change-log file-name buffer-file))))
494 ;; Set ITEM to the file name to use in the new item. 493 ;; Set ITEM to the file name to use in the new item.
495 (item (add-log-file-name buffer-file file-name)) 494 (item (add-log-file-name buffer-file file-name))
496 bound) 495 bound)