mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 16:51:06 -07:00
Code Issues Projects Releases Wiki Activity

(detect_eol): If the coding system an alias, get

Browse source 
eol-type from the base of it.
This commit is contained in:
Kenichi Handa 1997-08-22 03:33:51 +00:00
parent 34317da2d4
commit fb3903d3c2
1 changed files with 5 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/coding.c
View file

@ -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);
}