procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(jka-compr-insert-file-contents):

Browse source 
Use auto-coding-alist-lookup to check for files that
should not have eol conversion, in the unibyte case.
This commit is contained in:
Richard M. Stallman 1999-04-08 22:26:13 +00:00
parent 418cb80df2
commit c352d95951
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/jka-compr.el
View file

@ -522,7 +522,11 @@ There should be no more than seven characters after the final `/'."
;; If multibyte characters are disabled,
;; don't do that conversion.
(and (null enable-multibyte-characters)
'raw-text-unix)
(or (auto-coding-alist-lookup
(save-match-data
(string-match (jka-compr-info-regexp info) filename)
(substring filename 0 (match-beginning 0))))
'raw-text))
(let ((coding (find-operation-coding-system
'insert-file-contents
(jka-compr-byte-compiler-base-file-name file))))