sources/uemacs/cuserid.patch

   1 --- pklock.c.orig       2007-05-17 20:12:20.000000000 -0700
   2 +++ pklock.c    2007-05-17 20:14:14.000000000 -0700
   3 @@ -81,8 +81,7 @@
   4         if ((n = read(fd, locker, MAXNAME)) < 1)
   5         {
   6                 lseek(fd, 0, SEEK_SET);
   7 -/*             strcpy(locker, getlogin()); */
   8 -               cuserid(locker);
   9 +               strcpy(locker, getlogin());
  10                 strcat(locker+strlen(locker), "@");
  11                 gethostname(locker+strlen(locker), 64);
  12                 write(fd, locker, strlen(locker));