From fdf91be0320d1ff17fe20ac924bd55474b5132ec Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 17 May 2003 15:49:42 +0000 Subject: [PATCH] (map_char_table): Fix previous change. --- src/fns.c | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/src/fns.c b/src/fns.c index 25013aa1898..ff0f7cb481c 100644 --- a/src/fns.c +++ b/src/fns.c @@ -2697,13 +2697,15 @@ map_char_table (c_function, function, table, subtable, arg, depth, indices) { int c1, c2, c; - if (NILP (elt)) - elt = XCHAR_TABLE (subtable)->defalt; - if (NILP (elt)) - elt = Faref (table, make_number (i)); c1 = depth >= 1 ? XFASTINT (indices[1]) : 0; c2 = depth >= 2 ? XFASTINT (indices[2]) : 0; c = MAKE_CHAR (charset, c1, c2); + + if (NILP (elt)) + elt = XCHAR_TABLE (subtable)->defalt; + if (NILP (elt)) + elt = Faref (table, make_number (c)); + if (c_function) (*c_function) (arg, make_number (c), elt); else -- 2.39.2