From: Richard M. Stallman Date: Wed, 4 Jan 1995 19:08:56 +0000 (+0000) Subject: Use SAVE_MODIFF and BUF_SAVE_MODIFF X-Git-Tag: emacs-19.34~5525 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6a14015905ae1b72203302f329a5a5d7f1baa187;p=emacs.git Use SAVE_MODIFF and BUF_SAVE_MODIFF instead of direct access to the save_modiff field. --- diff --git a/src/filelock.c b/src/filelock.c index 8bc38bbbe7a..2e7e2e20e94 100644 --- a/src/filelock.c +++ b/src/filelock.c @@ -381,7 +381,7 @@ unlock_all_files () for (tail = Vbuffer_alist; GC_CONSP (tail); tail = XCONS (tail)->cdr) { b = XBUFFER (XCONS (XCONS (tail)->car)->cdr); - if (STRINGP (b->filename) && b->save_modified < BUF_MODIFF (b)) + if (STRINGP (b->filename) && BUF_SAVE_MODIFF (b) < BUF_MODIFF (b)) unlock_file (b->filename); } } @@ -399,7 +399,7 @@ or else nothing is done if current buffer isn't visiting a file.") fn = current_buffer->filename; else CHECK_STRING (fn, 0); - if (current_buffer->save_modified < MODIFF + if (SAVE_MODIFF < MODIFF && !NILP (fn)) lock_file (fn); return Qnil; @@ -411,8 +411,8 @@ DEFUN ("unlock-buffer", Funlock_buffer, Sunlock_buffer, if it should normally be locked.") () { - if (current_buffer->save_modified < MODIFF && - STRINGP (current_buffer->filename)) + if (SAVE_MODIFF < MODIFF + && STRINGP (current_buffer->filename)) unlock_file (current_buffer->filename); return Qnil; } @@ -423,8 +423,8 @@ if it should normally be locked.") unlock_buffer (buffer) struct buffer *buffer; { - if (buffer->save_modified < BUF_MODIFF (buffer) && - STRINGP (buffer->filename)) + if (BUF_SAVE_MODIFF (buffer) < BUF_MODIFF (buffer) + && STRINGP (buffer->filename)) unlock_file (buffer->filename); }