From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 23 Aug 2008 16:51:47 +0000 (+0000)
Subject: (USER_FULL_NAME): Define to pw->pw_gecos if undefined.
X-Git-Tag: emacs-pretest-23.0.90~3327
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d823c26bfda6c4811615ae7fea776c61272b61ca;p=emacs.git

(USER_FULL_NAME): Define to pw->pw_gecos if undefined.
(Fuser_full_name): Use USER_FULL_NAME instead of a literal pw->pw_gecos.
---

diff --git a/src/editfns.c b/src/editfns.c
index 71973cec914..1915de5f7c7 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -67,6 +67,10 @@ along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.  */
 #define NULL 0
 #endif
 
+#ifndef USER_FULL_NAME
+#define USER_FULL_NAME pw->pw_gecos
+#endif
+
 #ifndef USE_CRT_DLL
 extern char **environ;
 #endif
@@ -1370,7 +1374,7 @@ name, or nil if there is no such user.  */)
   if (!pw)
     return Qnil;
 
-  p = (unsigned char *) pw->pw_gecos;
+  p = (unsigned char *) USER_FULL_NAME;
   /* Chop off everything after the first comma. */
   q = (unsigned char *) index (p, ',');
   full = make_string (p, q ? q - p : strlen (p));