This patch is a winner!
Well, actually the code does initialize old_current_buffer, so I
propose instead this slight improvement:
Index: filelock.c
===================================================================
RCS file: /usr/CVSroot/XEmacs/xemacs/src/filelock.c,v
retrieving revision 1.10.2.9
diff -u -U7 -w -r1.10.2.9 filelock.c
--- filelock.c 2000/11/07 07:27:08 1.10.2.9
+++ filelock.c 2000/11/16 14:49:29
@@ -316,14 +316,15 @@
Lisp_Object old_current_buffer;
Lisp_Object subject_buf;
if (inhibit_clash_detection)
return;
XSETBUFFER (old_current_buffer, current_buffer);
+ subject_buf = Qnil;
GCPRO3 (fn, subject_buf, old_current_buffer);
orig_fn = fn;
fn = Fexpand_file_name (fn, Qnil);
/* Create the name of the lock-file for file fn */
MAKE_LOCK_NAME (lfname, fn);
>>>> "GE" == Gunnar Evermann
<ge204(a)eng.cam.ac.uk> writes:
GE> --- filelock.c~ Wed Nov 8 11:20:49 2000
GE> +++ filelock.c Thu Nov 16 13:28:37 2000
GE> @@ -313,8 +313,8 @@
GE> register char *lfname, *locker;
GE> lock_info_type lock_info;
GE> struct gcpro gcpro1, gcpro2, gcpro3;
GE> - Lisp_Object old_current_buffer;
GE> - Lisp_Object subject_buf;
GE> + Lisp_Object old_current_buffer = Qnil;
GE> + Lisp_Object subject_buf = Qnil;
GE> if (inhibit_clash_detection)
GE> return;