* src/menu.c (x_popup_menu_1): Use calln.

This commit is contained in:
Gerd Möllmann 2025-02-18 15:41:07 +01:00
parent c54d6680d3
commit bf067daf0d

View file

@ -1112,10 +1112,7 @@ Lisp_Object
x_popup_menu_1 (Lisp_Object position, Lisp_Object menu)
{
if (!NILP (Vx_popup_menu_function))
{
Lisp_Object args[] = { Qx_popup_menu_function, position, menu, };
return run_hook_with_args (3, args, Ffuncall);
}
return calln (Qx_popup_menu_function, position, menu);
Lisp_Object keymap, tem, tem2 = Qnil;
int xpos = 0, ypos = 0;