From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 27 Mar 1995 20:39:28 +0000 (+0000)
Subject: (init_editfns): Use NAME envvar to init user-full-name.
X-Git-Tag: emacs-19.34~4723
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9d36d0714bd61e252483acaa5f80501838a50175;p=emacs.git

(init_editfns): Use NAME envvar to init user-full-name.
---

diff --git a/src/editfns.c b/src/editfns.c
index 6abbe0e9a26..41afda29a6d 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -117,6 +117,10 @@ init_editfns ()
       Vuser_full_name = build_string (r);
     }
 #endif /* AMPERSAND_FULL_NAME */
+
+  p = getenv ("NAME");
+  if (p)
+    Vuser_full_name = build_string (p);
 }
 
 DEFUN ("char-to-string", Fchar_to_string, Schar_to_string, 1, 1, 0,