1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-21 18:23:59 +00:00

(Ffontset_info): Pass new arg to map_char_table.

This commit is contained in:
Richard M. Stallman 2003-05-17 12:46:53 +00:00
parent 44356f63a3
commit 6117a9cde1

View File

@ -1305,7 +1305,7 @@ If FRAME is omitted, it defaults to the currently selected frame. */)
{
/* Merge FONTSET onto the default fontset. */
val = Fcopy_sequence (Vdefault_fontset);
map_char_table (override_font_info, Qnil, fontset, val, 0, indices);
map_char_table (override_font_info, Qnil, fontset, fontset, val, 0, indices);
fontset = val;
}
@ -1317,7 +1317,7 @@ If FRAME is omitted, it defaults to the currently selected frame. */)
Fcons (XCDR (FONTSET_ASCII (fontset)), Qnil)),
Qnil);
val = Fcons (val, val);
map_char_table (accumulate_font_info, Qnil, fontset, val, 0, indices);
map_char_table (accumulate_font_info, Qnil, fontset, fontset, val, 0, indices);
val = XCDR (val);
/* For each FONT-INFO, if CHAR_OR_RANGE (car part) is a generic