From fb3903d3c273a8ab3e8a497e7b665ecb4162e290 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Fri, 22 Aug 1997 03:33:51 +0000 Subject: [PATCH] (detect_eol): If the coding system an alias, get eol-type from the base of it. --- src/coding.c | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/src/coding.c b/src/coding.c index e46a1289ba2..548a7388527 100644 --- a/src/coding.c +++ b/src/coding.c @@ -2825,14 +2825,17 @@ detect_eol (coding, src, src_bytes) 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); } -- 2.39.2