Fix regression introduced by July 10 filelock.c patch.

[gnu-emacs] / src / filelock.c

diff --git a/src/filelock.c b/src/filelock.c
index f21240f83403d3ccee2ce2b72d8aa73cff198113..ba55c1c146ae0a59a2d5bcd83cfed20b644a0f12 100644 (file)
--- a/src/filelock.c
+++ b/src/filelock.c
@@ -316,7 +316,7 @@ fill_in_lock_file_name (register char *lockfile, register Lisp_Object fn)
   p[1] = '.';
   p[2] = '#';
 
-  p = p + length + 2;
+  p = lockfile + length + 2;
 
   while (lstat (lockfile, &st) == 0 && !S_ISLNK (st.st_mode))
     {