changeset 20131:33fbdbaf65c2

(unlock_all_files): Don't call unlock_file; do the work directly, and avoid calling Fexpand_file_name.
author Karl Heuer <kwzh@gnu.org>
date Thu, 23 Oct 1997 06:53:36 +0000
parents 422958809490
children b691f68b0757
files src/filelock.c
diffstat 1 files changed, 8 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/filelock.c	Thu Oct 23 06:52:01 1997 +0000
+++ b/src/filelock.c	Thu Oct 23 06:53:36 1997 +0000
@@ -385,7 +385,14 @@
     {
       b = XBUFFER (XCONS (XCONS (tail)->car)->cdr);
       if (STRINGP (b->file_truename) && BUF_SAVE_MODIFF (b) < BUF_MODIFF (b))
-	unlock_file (b->file_truename);
+	{
+	  register char *lfname;
+
+	  MAKE_LOCK_NAME (lfname, b->file_truename);
+
+	  if (current_lock_owner (0, lfname) == 2)
+	    unlink (lfname);
+	}
     }
 }