diff options
author | Richard M. Stallman <rms@gnu.org> | 2002-09-29 20:50:15 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 2002-09-29 20:50:15 +0000 |
commit | 5b88a2c53a1fa7f8270e2922efc82f99fa45088f (patch) | |
tree | 3424420665f29dc7cfd75e6d2e2d78a09063dba3 /lisp/startup.el | |
parent | 580f6aa50b37fa5230557e75b7009a951b302281 (diff) | |
download | emacs-5b88a2c53a1fa7f8270e2922efc82f99fa45088f.tar.gz |
Fix previous change.
Diffstat (limited to 'lisp/startup.el')
-rw-r--r-- | lisp/startup.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index 3e1526b37a5..eb8ce6e8418 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -1012,7 +1012,7 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'." (set-language-environment current-language-environment))) ;; Do this here in case the init file sets mail-host-address. - (or (equal user-mail-address "") + (if (equal user-mail-address "") (setq user-mail-address (concat (user-login-name) "@" (or mail-host-address (system-name))))) |