mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-24 06:20:43 -08:00
Code Issues Projects Releases Wiki Activity

Remove lock file when auto-saving into the visited file

Browse source 
* src/fileio.c (write_region): When auto-saving into the visited
file, unlock the file whenever we mark the buffer unmodified.
(Bug#25470)
This commit is contained in:
Eli Zaretskii 2017-01-18 20:36:14 +02:00
parent 5fefaaa8c0
commit 5304cb9831
1 changed files with 11 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

15
src/fileio.c
View file

@ -5142,19 +5142,26 @@ write_region (Lisp_Object start, Lisp_Object end, Lisp_Object filename,
if (! ok)
report_file_errno ("Write error", filename, save_errno);
bool auto_saving_into_visited_file =
auto_saving
&& ! NILP (Fstring_equal (BVAR (current_buffer, filename),
BVAR (current_buffer, auto_save_file_name)));
if (visiting)
{
SAVE_MODIFF = MODIFF;
XSETFASTINT (BVAR (current_buffer, save_length), Z - BEG);
bset_filename (current_buffer, visit_file);
update_mode_lines = 14;
if (auto_saving_into_visited_file)
unlock_file (lockname);
}
else if (quietly)
{
if (auto_saving
&& ! NILP (Fstring_equal (BVAR (current_buffer, filename),
BVAR (current_buffer, auto_save_file_name))))
SAVE_MODIFF = MODIFF;
if (auto_saving_into_visited_file)
{
SAVE_MODIFF = MODIFF;
unlock_file (lockname);
}
return Qnil;
}