From f1b2821874f1024a977c48eebc3fcc874505bbf5 Mon Sep 17 00:00:00 2001 From: Jim Blandy Date: Mon, 22 Feb 1993 15:09:33 +0000 Subject: * minibuf.c (Fdisplay_completion_list): Pass the proper number of arguments to Flength. * xmenu.c (list_of_items): Same. --- src/minibuf.c | 2 +- src/xmenu.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/minibuf.c b/src/minibuf.c index bc1074c89d..9b4867f571 100644 --- a/src/minibuf.c +++ b/src/minibuf.c @@ -1296,7 +1296,7 @@ or may be a list of two strings to be printed as if concatenated.") if (XTYPE (Vstandard_output) != Lisp_Buffer) { Lisp_Object tem; - tem = Flength (elt, Qt); + tem = Flength (elt); column += XINT (tem); } Fprinc (elt, Qnil); diff --git a/src/xmenu.c b/src/xmenu.c index e1c14da2f7..972c4333d3 100644 --- a/src/xmenu.c +++ b/src/xmenu.c @@ -653,7 +653,7 @@ list_of_items (vector, names, pane) /* get list from emacs and put to vector */ if (XTYPE (pane) != Lisp_Cons) pane = wrong_type_argument (Qlistp, pane); - i = XFASTINT (Flength (pane, 1)); + i = XFASTINT (Flength (pane)); *vector = (Lisp_Object *) xmalloc (i * sizeof (Lisp_Object)); *names = (char **) xmalloc (i * sizeof (char *)); -- cgit v1.2.3