Mercurial > emacs
changeset 62139:7f7d4a001320
(Fchar_table_range): Fix typos in docstring.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Fri, 06 May 2005 23:04:31 +0000 |
| parents | f43815bbb303 |
| children | 4b5cd45b60b9 |
| files | src/fns.c |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/fns.c Fri May 06 22:19:48 2005 +0000 +++ b/src/fns.c Fri May 06 23:04:31 2005 +0000 @@ -2536,19 +2536,19 @@ error ("Characters in the range have inconsistent values"); } return val; -} +} DEFUN ("char-table-range", Fchar_table_range, Schar_table_range, 2, 2, 0, doc: /* Return the value in CHAR-TABLE for a range of characters RANGE. -RANGE should be nil (for the default value) +RANGE should be nil (for the default value), a vector which identifies a character set or a row of a character set, a character set name, or a character code. If the characters in the specified range have different values, an error is signalled. -Note that this function doesn't check the parent of CHAR_TABLE. */) +Note that this function doesn't check the parent of CHAR-TABLE. */) (char_table, range) Lisp_Object char_table, range; { @@ -2631,7 +2631,7 @@ current_default = XCHAR_TABLE (char_table)->contents[defalt]; return char_table_range (char_table, from, to, current_default); } - + val = XCHAR_TABLE (char_table)->contents[128 + charset_id]; if (! SUB_CHAR_TABLE_P (val)) return (NILP (val) ? current_default : val);