* buffer.c (Fforce_mode_line_update): Don't fall off end of function

that requires a return value.
(Fset_buffer_modified_p): Take advantage of this change to do
a tail call.

diff --git a/src/ChangeLog b/src/ChangeLog
index 7a727482d7b184ee23acc6da2ac5868742e7c812..d924233b7968a765556d4956e00b8ffa626d1325 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,10 @@
+2013-11-12  Paul Eggert  <eggert@cs.ucla.edu>
+
+       * buffer.c (Fforce_mode_line_update): Don't fall off end of function
+       that requires a return value.
+       (Fset_buffer_modified_p): Take advantage of this change to do
+       a tail call.
+
 2013-11-11  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * buffer.c (Frestore_buffer_modified_p): Sync it with

diff --git a/src/buffer.c b/src/buffer.c
index a528397a9d2b8128d6e6e253abcdf97e58d640fe..61b685ea5c5f7f534a4ce845ce5c654b46ac7113 100644 (file)
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -1341,6 +1341,7 @@ menu bar menus and the frame title.  */)
       update_mode_lines = 10;
       current_buffer->prevent_redisplay_optimizations_p = 1;
     }
+  return all;
 }
 
 DEFUN ("set-buffer-modified-p", Fset_buffer_modified_p, Sset_buffer_modified_p,
@@ -1362,9 +1363,7 @@ A non-nil FLAG means mark the buffer modified.  */)
      Ideally, I think there should be another mechanism for fontifying
      buffers without "modifying" buffers, or redisplay should be
      smarter about updating the `*' in mode lines.  --gerd  */
-  Fforce_mode_line_update (Qnil);
-
-  return flag;
+  return Fforce_mode_line_update (Qnil);
 }
 
 DEFUN ("restore-buffer-modified-p", Frestore_buffer_modified_p,