diff options
Diffstat (limited to 'src/chartab.c')
| -rw-r--r-- | src/chartab.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/chartab.c b/src/chartab.c index 065ae4f9f20..89983503ac6 100644 --- a/src/chartab.c +++ b/src/chartab.c | |||
| @@ -605,7 +605,7 @@ a cons of character codes (for characters in the range), or a character code. * | |||
| 605 | Lisp_Object val; | 605 | Lisp_Object val; |
| 606 | CHECK_CHAR_TABLE (char_table); | 606 | CHECK_CHAR_TABLE (char_table); |
| 607 | 607 | ||
| 608 | if (EQ (range, Qnil)) | 608 | if (NILP (range)) |
| 609 | val = XCHAR_TABLE (char_table)->defalt; | 609 | val = XCHAR_TABLE (char_table)->defalt; |
| 610 | else if (CHARACTERP (range)) | 610 | else if (CHARACTERP (range)) |
| 611 | val = CHAR_TABLE_REF (char_table, XFASTINT (range)); | 611 | val = CHAR_TABLE_REF (char_table, XFASTINT (range)); |
| @@ -642,7 +642,7 @@ or a character code. Return VALUE. */) | |||
| 642 | for (i = 0; i < chartab_size[0]; i++) | 642 | for (i = 0; i < chartab_size[0]; i++) |
| 643 | set_char_table_contents (char_table, i, value); | 643 | set_char_table_contents (char_table, i, value); |
| 644 | } | 644 | } |
| 645 | else if (EQ (range, Qnil)) | 645 | else if (NILP (range)) |
| 646 | set_char_table_defalt (char_table, value); | 646 | set_char_table_defalt (char_table, value); |
| 647 | else if (CHARACTERP (range)) | 647 | else if (CHARACTERP (range)) |
| 648 | char_table_set (char_table, XINT (range), value); | 648 | char_table_set (char_table, XINT (range), value); |