# HG changeset patch # User Kenichi Handa # Date 1190274592 0 # Node ID f5e7e4e0fa669cb836989e51212bd52a45c922b4 # Parent eec5de3521b8eaf525582180aec9250d1aa103eb (map_sub_char_table): If the range contains just one character, call the function with that character even if the depth is not 3. (map_char_table): Likewise. diff -r eec5de3521b8 -r f5e7e4e0fa66 src/chartab.c --- a/src/chartab.c Wed Sep 19 13:59:16 2007 +0000 +++ b/src/chartab.c Thu Sep 20 07:49:52 2007 +0000 @@ -805,8 +805,7 @@ if (! NILP (val) && different_value) { XSETCDR (range, make_number (c - 1)); - if (depth == 3 - && EQ (XCAR (range), XCDR (range))) + if (EQ (XCAR (range), XCDR (range))) { if (c_function) (*c_function) (arg, XCAR (range), val); @@ -875,10 +874,20 @@ if (! NILP (val)) { - if (c_function) - (*c_function) (arg, range, val); + if (EQ (XCAR (range), XCDR (range))) + { + if (c_function) + (*c_function) (arg, XCAR (range), val); + else + call2 (function, XCAR (range), val); + } else - call2 (function, range, val); + { + if (c_function) + (*c_function) (arg, range, val); + else + call2 (function, range, val); + } } UNGCPRO;