diff options
| author | Karl Heuer | 1994-02-11 21:55:57 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-02-11 21:55:57 +0000 |
| commit | 157acde57fdfa21dac4352d8db0016d0acc7e254 (patch) | |
| tree | a96cdb45beecbdbf47aa1fa3441fc6d7b2a6faf6 | |
| parent | df00183bf8cae1714b8af7764f6e5116ab9cfbb7 (diff) | |
| download | emacs-157acde57fdfa21dac4352d8db0016d0acc7e254.tar.gz emacs-157acde57fdfa21dac4352d8db0016d0acc7e254.zip | |
(gnus-inews-login-name): Remove unnecessary (getenv "LOGNAME") and (getenv
"USER"), since (user-login-name) already does this.
| -rw-r--r-- | lisp/gnuspost.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/gnuspost.el b/lisp/gnuspost.el index 5f5d4c42526..2a2fe0dd3e9 100644 --- a/lisp/gnuspost.el +++ b/lisp/gnuspost.el | |||
| @@ -631,10 +631,9 @@ a program specified by the rest of the value." | |||
| 631 | 631 | ||
| 632 | (defun gnus-inews-login-name () | 632 | (defun gnus-inews-login-name () |
| 633 | "Return user login name. | 633 | "Return user login name. |
| 634 | Got from the variable gnus-user-login-name, the environment variables | 634 | Got from the variable `gnus-user-login-name' and the function |
| 635 | USER and LOGNAME, and the function user-login-name." | 635 | `user-login-name'." |
| 636 | (or gnus-user-login-name | 636 | (or gnus-user-login-name (user-login-name))) |
| 637 | (getenv "USER") (getenv "LOGNAME") (user-login-name))) | ||
| 638 | 637 | ||
| 639 | (defun gnus-inews-full-name () | 638 | (defun gnus-inews-full-name () |
| 640 | "Return user full name. | 639 | "Return user full name. |