Mercurial > emacs
changeset 11819:d9b1cec100c6
(byte-compile-insert-header): Cope if user-mail-address is unbound.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 15 May 1995 23:01:17 +0000 |
| parents | f470809e6a60 |
| children | 362251066737 |
| files | lisp/emacs-lisp/bytecomp.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/bytecomp.el Mon May 15 23:00:16 1995 +0000 +++ b/lisp/emacs-lisp/bytecomp.el Mon May 15 23:01:17 1995 +0000 @@ -1376,7 +1376,7 @@ "\000\000\000\n" ) (insert ";;; compiled by " - (or user-mail-address + (or (and (boundp 'user-mail-address) user-mail-address) (concat (user-login-name) "@" (system-name))) " on " (current-time-string) "\n;;; from file " filename "\n")