diff options
| author | Karl Heuer <kwzh@gnu.org> | 1994-02-11 21:54:44 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1994-02-11 21:54:44 +0000 |
| commit | df00183bf8cae1714b8af7764f6e5116ab9cfbb7 (patch) | |
| tree | f62ae031e48ec78c5f9aa4dd32c55cfe51c7ef07 | |
| parent | a6451a9fa77d22d125cd55cfa04bd896f4e5e5a0 (diff) | |
| download | emacs-df00183bf8cae1714b8af7764f6e5116ab9cfbb7.tar.gz emacs-df00183bf8cae1714b8af7764f6e5116ab9cfbb7.tar.bz2 emacs-df00183bf8cae1714b8af7764f6e5116ab9cfbb7.zip | |
(display-time-filter): Remove unnecessary (getenv "LOGNAME") and (getenv
"USER"), since (user-login-name) already does this.
| -rw-r--r-- | lisp/time.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/time.el b/lisp/time.el index 3e61e78448d..fe3df1f99ac 100644 --- a/lisp/time.el +++ b/lisp/time.el @@ -98,9 +98,7 @@ After each update, `display-time-hook' is run with `run-hooks'." (mail-spool-file (or display-time-mail-file (getenv "MAIL") (concat rmail-spool-directory - (or (getenv "LOGNAME") - (getenv "USER") - (user-login-name))))) + (user-login-name)))) hour am-pm-flag mail-flag) (setq hour (read (substring time 11 13))) (if (not display-time-24hr-format) |