From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 19 Mar 2004 00:48:51 +0000 (+0000)
Subject: (add-change-log-entry): Simplify.
X-Git-Tag: ttn-vms-21-2-B4~7214
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dd816e0df87d4eb5d7f2e5e6e2b0416588cb6df0;p=emacs.git

(add-change-log-entry): Simplify.
---

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 @@
 ;;; add-log.el --- change log maintenance commands for Emacs
 
-;; Copyright (C) 1985, 86, 88, 93, 94, 97, 98, 2000, 2003
+;; Copyright (C) 1985, 86, 88, 93, 94, 97, 98, 2000, 03, 2004
 ;;           Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
@@ -489,8 +489,7 @@ non-nil, otherwise in local time."
 			    (funcall add-log-buffer-file-name-function)
 			  buffer-file-name))
 	 (buffer-file (if buf-file-name (expand-file-name buf-file-name)))
-	 (file-name (expand-file-name
-		     (or file-name (find-change-log file-name buffer-file))))
+	 (file-name (expand-file-name (find-change-log file-name buffer-file)))
 	 ;; Set ITEM to the file name to use in the new item.
 	 (item (add-log-file-name buffer-file file-name))
 	 bound)