aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman2003-05-17 15:49:42 +0000
committerRichard M. Stallman2003-05-17 15:49:42 +0000
commitfdf91be0320d1ff17fe20ac924bd55474b5132ec (patch)
tree172186c233c0c83dff163b6214c92490f589fa6b /src
parent1fd1cc2fc21249b2ef0d776b73333995cbe1e960 (diff)
downloademacs-fdf91be0320d1ff17fe20ac924bd55474b5132ec.tar.gz
emacs-fdf91be0320d1ff17fe20ac924bd55474b5132ec.zip
(map_char_table): Fix previous change.
Diffstat (limited to 'src')
-rw-r--r--src/fns.c10
1 files 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)
2697 { 2697 {
2698 int c1, c2, c; 2698 int c1, c2, c;
2699 2699
2700 if (NILP (elt))
2701 elt = XCHAR_TABLE (subtable)->defalt;
2702 if (NILP (elt))
2703 elt = Faref (table, make_number (i));
2704 c1 = depth >= 1 ? XFASTINT (indices[1]) : 0; 2700 c1 = depth >= 1 ? XFASTINT (indices[1]) : 0;
2705 c2 = depth >= 2 ? XFASTINT (indices[2]) : 0; 2701 c2 = depth >= 2 ? XFASTINT (indices[2]) : 0;
2706 c = MAKE_CHAR (charset, c1, c2); 2702 c = MAKE_CHAR (charset, c1, c2);
2703
2704 if (NILP (elt))
2705 elt = XCHAR_TABLE (subtable)->defalt;
2706 if (NILP (elt))
2707 elt = Faref (table, make_number (c));
2708
2707 if (c_function) 2709 if (c_function)
2708 (*c_function) (arg, make_number (c), elt); 2710 (*c_function) (arg, make_number (c), elt);
2709 else 2711 else