aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKarl Heuer1994-02-11 21:55:57 +0000
committerKarl Heuer1994-02-11 21:55:57 +0000
commit157acde57fdfa21dac4352d8db0016d0acc7e254 (patch)
treea96cdb45beecbdbf47aa1fa3441fc6d7b2a6faf6
parentdf00183bf8cae1714b8af7764f6e5116ab9cfbb7 (diff)
downloademacs-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.el7
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.
634Got from the variable gnus-user-login-name, the environment variables 634Got from the variable `gnus-user-login-name' and the function
635USER 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.