diff options
-rw-r--r-- | src/ChangeLog | 4 | ||||
-rw-r--r-- | src/editfns.c | 4 |
2 files changed, 6 insertions, 2 deletions
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; } |