(gnus-inews-login-name): Remove unnecessary (getenv "LOGNAME") and (getenv
authorKarl Heuer <kwzh@gnu.org>
Fri, 11 Feb 1994 21:55:57 +0000 (21:55 +0000)
committerKarl Heuer <kwzh@gnu.org>
Fri, 11 Feb 1994 21:55:57 +0000 (21:55 +0000)
"USER"), since (user-login-name) already does this.

lisp/gnuspost.el

index 5f5d4c4..2a2fe0d 100644 (file)
@@ -631,10 +631,9 @@ a program specified by the rest of the value."
 
 (defun gnus-inews-login-name ()
   "Return user login name.
-Got from the variable gnus-user-login-name, the environment variables
-USER and LOGNAME, and the function user-login-name."
-  (or gnus-user-login-name
-      (getenv "USER") (getenv "LOGNAME") (user-login-name)))
+Got from the variable `gnus-user-login-name' and the function
+`user-login-name'."
+  (or gnus-user-login-name (user-login-name)))
 
 (defun gnus-inews-full-name ()
   "Return user full name.