diff options
Diffstat (limited to 'src/fns.c')
| -rw-r--r-- | src/fns.c | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/src/fns.c b/src/fns.c index bbff9b6d554..9f56a8f01f5 100644 --- a/src/fns.c +++ b/src/fns.c @@ -2706,7 +2706,6 @@ if `last-nonmenu-event' is nil, and `use-dialog-box' is non-nil. */) (Lisp_Object prompt) { register Lisp_Object ans; - Lisp_Object args[2]; struct gcpro gcpro1; CHECK_STRING (prompt); @@ -2725,10 +2724,8 @@ if `last-nonmenu-event' is nil, and `use-dialog-box' is non-nil. */) return obj; } - args[0] = prompt; - args[1] = build_string ("(yes or no) "); - prompt = Fconcat (2, args); - + prompt = Fconcat (2, ((Lisp_Object []) + { prompt, build_local_string ("(yes or no) ") })); GCPRO1 (prompt); while (1) |