Mercurial > emacs
changeset 10752:e4fb5e01090a
(unlock_buffer, unlock_all_files, Flock_buffer)
(Funlock_buffer): Use buffer's file_truename, not filename.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 14 Feb 1995 16:33:49 +0000 |
parents | dea8f022819d |
children | e0de204ec865 |
files | src/filelock.c |
diffstat | 1 files changed, 7 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/src/filelock.c Tue Feb 14 16:33:19 1995 +0000 +++ b/src/filelock.c Tue Feb 14 16:33:49 1995 +0000 @@ -381,8 +381,8 @@ for (tail = Vbuffer_alist; GC_CONSP (tail); tail = XCONS (tail)->cdr) { b = XBUFFER (XCONS (XCONS (tail)->car)->cdr); - if (STRINGP (b->filename) && BUF_SAVE_MODIFF (b) < BUF_MODIFF (b)) - unlock_file (b->filename); + if (STRINGP (b->file_truename) && BUF_SAVE_MODIFF (b) < BUF_MODIFF (b)) + unlock_file (b->file_truename); } } @@ -396,7 +396,7 @@ Lisp_Object fn; { if (NILP (fn)) - fn = current_buffer->filename; + fn = current_buffer->file_truename; else CHECK_STRING (fn, 0); if (SAVE_MODIFF < MODIFF @@ -412,8 +412,8 @@ () { if (SAVE_MODIFF < MODIFF - && STRINGP (current_buffer->filename)) - unlock_file (current_buffer->filename); + && STRINGP (current_buffer->file_truename)) + unlock_file (current_buffer->file_truename); return Qnil; } @@ -424,8 +424,8 @@ struct buffer *buffer; { if (BUF_SAVE_MODIFF (buffer) < BUF_MODIFF (buffer) - && STRINGP (buffer->filename)) - unlock_file (buffer->filename); + && STRINGP (buffer->file_truename)) + unlock_file (buffer->file_truename); } DEFUN ("file-locked-p", Ffile_locked_p, Sfile_locked_p, 0, 1, 0,