diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2004-03-19 00:48:51 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2004-03-19 00:48:51 +0000 |
| commit | dd816e0df87d4eb5d7f2e5e6e2b0416588cb6df0 (patch) | |
| tree | 4c1224147f782103d06a5ac04c55e789895f5537 /lisp | |
| parent | da06e4d71b0b5f9522126f180bd4888771995608 (diff) | |
| download | emacs-dd816e0df87d4eb5d7f2e5e6e2b0416588cb6df0.tar.gz | |
(add-change-log-entry): Simplify.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/add-log.el | 5 |
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 @@ ;;; 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) |