From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 15 Dec 1996 20:14:13 +0000 (+0000)
Subject: (Fuser_full_name): Return nil if the specified user doesn't exist.
X-Git-Tag: emacs-20.1~3261
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3347526ce7af0facc2a10c346b7f65880cd9f684;p=emacs.git

(Fuser_full_name): Return nil if the specified user doesn't exist.
(init_editfns): Set Vuser_full_name to "unknown" if the user name
can't be resolved.
---

diff --git a/src/editfns.c b/src/editfns.c
index 2599dc9d5a1..9ff24cba8f3 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -109,6 +109,8 @@ init_editfns ()
   p = (unsigned char *) getenv ("NAME");
   if (p)
     Vuser_full_name = build_string (p);
+  else if (NILP (Vuser_full_name))
+    Vuser_full_name = build_string ("unknown");
 }
 
 DEFUN ("char-to-string", Fchar_to_string, Schar_to_string, 1, 1, 0,
@@ -585,7 +587,7 @@ name, or \"unknown\" if no such user could be found.")
     error ("Invalid UID specification");
 
   if (!pw)
-    return build_string ("unknown");
+    return Qnil;
   
   p = (unsigned char *) USER_FULL_NAME;
   /* Chop off everything after the first comma. */