diff lisp/prim/startup.el @ 38:1a767b41a199 r19-15b102

Import from CVS: tag r19-15b102
author cvs
date Mon, 13 Aug 2007 08:54:01 +0200
parents e04119814345
children 8d2a9b52c682
line wrap: on
line diff
--- a/lisp/prim/startup.el	Mon Aug 13 08:53:41 2007 +0200
+++ b/lisp/prim/startup.el	Mon Aug 13 08:54:01 2007 +0200
@@ -615,6 +615,7 @@
   (setq init-file-loaded t)
 
   ;; Do this here in case the init file sets mail-host-address.
+  ;; Don't do this here unless noninteractive, it is frequently wrong. -sb
   (or user-mail-address
       (setq user-mail-address (concat (user-login-name) "@"
 				      (or mail-host-address