diff options
Diffstat (limited to 'src/fns.c')
| -rw-r--r-- | src/fns.c | 2 |
1 files changed, 1 insertions, 1 deletions
| @@ -718,7 +718,7 @@ concat (ptrdiff_t nargs, Lisp_Object *args, | |||
| 718 | val = make_uninit_string (result_len); | 718 | val = make_uninit_string (result_len); |
| 719 | 719 | ||
| 720 | /* In `append', if all but last arg are nil, return last arg. */ | 720 | /* In `append', if all but last arg are nil, return last arg. */ |
| 721 | if (target_type == Lisp_Cons && EQ (val, Qnil)) | 721 | if (target_type == Lisp_Cons && NILP (val)) |
| 722 | return last_tail; | 722 | return last_tail; |
| 723 | 723 | ||
| 724 | /* Copy the contents of the args into the result. */ | 724 | /* Copy the contents of the args into the result. */ |