From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 9 Oct 1994 17:23:09 +0000 (+0000)
Subject: (byte-compile-insert-header): Use user-mail-address.
X-Git-Tag: emacs-19.34~6440
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=34791302d4f725161e81a48b6010b6b4af424470;p=emacs.git

(byte-compile-insert-header): Use user-mail-address.
---

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index fa2ef9f3331..7af9455848e 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1336,7 +1336,7 @@ With argument, insert value in current buffer after the form."
      (if (byte-compile-version-cond byte-compile-compatibility) 18 19)
      "\000\000\000\n"
      )
-    (insert ";;; compiled by " (user-login-name) "@" (system-name) " on "
+    (insert ";;; compiled by " user-mail-address " on "
 	    (current-time-string) "\n;;; from file " filename "\n")
     (insert ";;; emacs version " emacs-version ".\n")
     (insert ";;; bytecomp version " byte-compile-version "\n;;; "