Mercurial > emacs
changeset 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 | a3240ad2e954 |
children | 1a9f6be64530 |
files | src/coding.c |
diffstat | 1 files changed, 5 insertions(+), 2 deletions(-) [+] |
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); }