Mercurial > emacs

changeset 14855:52f730593064

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vc-update-change-log): Use add-log-full-name and add-log-mailing-address only if non-nil.
author Richard M. Stallman <rms@gnu.org>
date Fri, 22 Mar 1996 13:25:21 +0000
parents 291cdb9b5e03
children f64fa743c80f
files lisp/vc.el
diffstat 1 files changed, 4 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc.el	Thu Mar 21 23:26:26 1996 +0000
+++ b/lisp/vc.el	Fri Mar 22 13:25:21 1996 +0000
@@ -1770,12 +1770,10 @@
 			      f)))
 			 (directory-files RCS nil "...\\|^[^.]\\|^.[^.]")))))))
   (let ((odefault default-directory)
-	(full-name (if (boundp 'add-log-full-name)
-		       add-log-full-name
-		     (user-full-name)))
-	(mailing-address (if (boundp 'add-log-mailing-address)
-			     add-log-mailing-address
-			   user-mail-address)))
+	(full-name (or add-log-full-name
+		       (user-full-name)))
+	(mailing-address (or add-log-mailing-address
+			     user-mail-address)))
     (find-file-other-window (find-change-log))
     (barf-if-buffer-read-only)
     (vc-buffer-sync)