(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 71973cec91423027931d127ba72c497d599cb6ba..1915de5f7c7318a8ade5d6d5fb0ed84f90e6f503 100644 (file)
--- 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));