Mercurial > emacs
diff src/coding.c @ 19463:33c5695c6c7e
(detect_eol): If the coding system an alias, get
eol-type from the base of it.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Fri, 22 Aug 1997 03:33:51 +0000 |
| parents | d9374f5ebd3a |
| children | 38c46419910a |
line wrap: on
line diff
--- a/src/coding.c Fri Aug 22 03:15:57 1997 +0000 +++ b/src/coding.c Fri Aug 22 03:33:51 1997 +0000 @@ -2825,14 +2825,17 @@ unsigned char *src; int src_bytes; { - Lisp_Object val; + Lisp_Object val, coding_system; int eol_type = detect_eol_type (src, src_bytes); if (eol_type == CODING_EOL_UNDECIDED) /* We found no end-of-line in the source text. */ return; - val = Fget (coding->symbol, Qeol_type); + coding_system = coding->symbol; + while (!NILP (coding_system) + && NILP (val = Fget (coding_system, Qeol_type))) + coding_system = Fget (coding_system, Qcoding_system); if (VECTORP (val) && XVECTOR (val)->size == 3) setup_coding_system (XVECTOR (val)->contents[eol_type], coding); }
