diff options
| author | Richard M. Stallman | 2003-05-17 15:49:42 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2003-05-17 15:49:42 +0000 |
| commit | fdf91be0320d1ff17fe20ac924bd55474b5132ec (patch) | |
| tree | 172186c233c0c83dff163b6214c92490f589fa6b /src | |
| parent | 1fd1cc2fc21249b2ef0d776b73333995cbe1e960 (diff) | |
| download | emacs-fdf91be0320d1ff17fe20ac924bd55474b5132ec.tar.gz emacs-fdf91be0320d1ff17fe20ac924bd55474b5132ec.zip | |
(map_char_table): Fix previous change.
Diffstat (limited to 'src')
| -rw-r--r-- | src/fns.c | 10 |
1 files changed, 6 insertions, 4 deletions
| @@ -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 |