diff --git a/src/ChangeLog b/src/ChangeLog
index 4e84f9510dd..2f88aa5ad07 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2011-03-30  Paul Eggert  <eggert@cs.ucla.edu>
+
+	* editfns.c (Fmessage_box): Remove unused local var.
+
 2011-03-29  Paul Eggert  <eggert@cs.ucla.edu>
 
 	* xdisp.c (try_window_reusing_current_matrix, x_produce_glyphs):
diff --git a/src/editfns.c b/src/editfns.c
index 58f634fa479..d0f1df694d5 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -3444,12 +3444,12 @@ usage: (message-box FORMAT-STRING &rest ARGS)  */)
       if (FRAME_WINDOW_P (XFRAME (selected_frame))
 	  || FRAME_MSDOS_P (XFRAME (selected_frame)))
       {
-	Lisp_Object pane, menu, obj;
+	Lisp_Object pane, menu;
 	struct gcpro gcpro1;
 	pane = Fcons (Fcons (build_string ("OK"), Qt), Qnil);
 	GCPRO1 (pane);
 	menu = Fcons (val, pane);
-	obj = Fx_popup_dialog (Qt, menu, Qt);
+	Fx_popup_dialog (Qt, menu, Qt);
 	UNGCPRO;
 	return val;
       }