Mercurial > emacs

comparison src/filelock.c @ 112434:9de5a68b57e1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Promote SSDATA macro from gtkutil.c and xsmfns.c to lisp.h.
author Paul Eggert <eggert@cs.ucla.edu>
date Sat, 22 Jan 2011 18:56:06 -0800
parents 42e22c4f06b7
children
comparison
equal deleted inserted replaced
112433:7b649f6eac4f 112434:9de5a68b57e1
356 356
357 /* Call this first because it can GC. */ 357 /* Call this first because it can GC. */
358 boot_time = get_boot_time (); 358 boot_time = get_boot_time ();
359 359
360 if (STRINGP (Fuser_login_name (Qnil))) 360 if (STRINGP (Fuser_login_name (Qnil)))
361 user_name = (char *)SDATA (Fuser_login_name (Qnil)); 361 user_name = SSDATA (Fuser_login_name (Qnil));
362 else 362 else
363 user_name = ""; 363 user_name = "";
364 if (STRINGP (Fsystem_name ())) 364 if (STRINGP (Fsystem_name ()))
365 host_name = (char *)SDATA (Fsystem_name ()); 365 host_name = SSDATA (Fsystem_name ());
366 else 366 else
367 host_name = ""; 367 host_name = "";
368 lock_info_str = (char *)alloca (strlen (user_name) + strlen (host_name) 368 lock_info_str = (char *)alloca (strlen (user_name) + strlen (host_name)
369 + LOCK_PID_MAX + 30); 369 + LOCK_PID_MAX + 30);
370 370
736 defsubr (&Sunlock_buffer); 736 defsubr (&Sunlock_buffer);
737 defsubr (&Slock_buffer); 737 defsubr (&Slock_buffer);
738 defsubr (&Sfile_locked_p); 738 defsubr (&Sfile_locked_p);
739 #endif 739 #endif
740 } 740 }
741