# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 931968057 0
# Node ID 1dfff6fa0f05fd67bde4d4e25e403862d17dbb5a
# Parent  970c0b904d354fac81a6c74735ce36b2713d4ac4
(lock_file): Do nothing if purifying.

diff -r 970c0b904d35 -r 1dfff6fa0f05 src/filelock.c
--- a/src/filelock.c	Wed Jul 14 08:16:49 1999 +0000
+++ b/src/filelock.c	Wed Jul 14 16:00:57 1999 +0000
@@ -545,6 +545,12 @@
   register char *lfname, *locker;
   lock_info_type lock_info;
 
+  /* Don't do locking while dumping Emacs.
+     Uncompressing wtmp files uses call-process, which does not work
+     in an uninitialized Emacs.  */
+  if (! NILP (Vpurify_flag))
+    return;
+
   orig_fn = fn;
   fn = Fexpand_file_name (fn, Qnil);
   encoded_fn = ENCODE_FILE (fn);