Mercurial > hg > xemacs-beta

comparison src/sysdep.c @ 282:c42ec1d1cded r21-0b39

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b39
author cvs
date Mon, 13 Aug 2007 10:33:18 +0200
parents ca9a9ec9c1c1
children 558f606b08ae
comparison
equal deleted inserted replaced
281:090b52736db2 282:c42ec1d1cded
2252 #endif /* HAVE_SOCKETS */ 2252 #endif /* HAVE_SOCKETS */
2253 2253
2254 void 2254 void
2255 init_system_name (void) 2255 init_system_name (void)
2256 { 2256 {
2257 #ifndef HAVE_GETHOSTNAME 2257 #if defined (WINDOWSNT)
2258 char hostname [MAX_COMPUTERNAME_LENGTH + 1];
2259 size_t size = sizeof(hostname);
2260 GetComputerName (hostname, &size);
2261 Vsystem_name = build_string (hostname);
2262 #elif !defined (HAVE_GETHOSTNAME)
2258 struct utsname uts; 2263 struct utsname uts;
2259 uname (&uts); 2264 uname (&uts);
2260 Vsystem_name = build_string (uts.nodename); 2265 Vsystem_name = build_string (uts.nodename);
2261 #else /* HAVE_GETHOSTNAME */ 2266 #else /* HAVE_GETHOSTNAME */
2262 unsigned int hostname_size = 256; 2267 unsigned int hostname_size = 256;