diff --git a/src/ChangeLog b/src/ChangeLog
index aff5a131f32..73e1a1c7bde 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,7 @@
 2007-02-16  Andreas Schwab  <schwab@suse.de>
 
+	* frame.c (Fmodify_frame_parameters): Return a value.
+
 	* editfns.c (Fformat): Add support for '+' flag.
 	* doprnt.c (doprnt1): Likewise.  Fix overflow checking.
 
diff --git a/src/frame.c b/src/frame.c
index f2b7c514cf3..8580ef79ad6 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -2321,6 +2321,8 @@ enabled such bindings for that variable with `make-variable-frame-local'.  */)
 	    call1 (Qframe_set_background_mode, frame);
 	}
     }
+
+  return Qnil;
 }
 
 DEFUN ("frame-char-height", Fframe_char_height, Sframe_char_height,