Skip to content
Snippets Groups Projects
Commit 3db2065a authored by andreasj's avatar andreasj
Browse files

Applied Jan's patch from <byaekrrfw6.fsf@bolzano.math.ethz.ch>

with subject "jka-compr patch for xemacs".
parent d75e73eb
No related branches found
No related tags found
No related merge requests found
2000-02-23 Jan Vroonhof <vroonhof@math.ethz.ch>
* jka-compr.el: Globally replace 'no-conversion with 'binary
2000-02-09 Martin Buchholz <martin@xemacs.org>
* crypt.el (crypt-build-encoding-alist): Remove bzip2 `--quiet'
......
......@@ -320,7 +320,7 @@
(jka-value-if-bound
coding-system-for-read)
'undecided))
(coding-system-for-write 'no-conversion))
(coding-system-for-write 'binary))
(unwind-protect
......@@ -464,7 +464,7 @@
;; save value used by the real write-region
;; without any code conversion.
(let ((coding-system-for-read 'no-conversion))
(let ((coding-system-for-read 'binary))
(jka-compr-call-process compress-program
(concat compress-message
" " base-name)
......@@ -474,7 +474,7 @@
compress-args))
(with-current-buffer temp-buffer
(let ((coding-system-for-write 'no-conversion))
(let ((coding-system-for-write 'binary))
(if (memq system-type '(ms-dos windows-nt))
(setq buffer-file-type t) )
(jka-compr-run-real-handler 'write-region
......@@ -689,8 +689,8 @@
;; conversion. An appropriate code conversion (if
;; necessary) is done by the later I/O operation
;; (e.g. load).
(let ((coding-system-for-read 'no-conversion)
(coding-system-for-write 'no-conversion))
(let ((coding-system-for-read 'binary)
(coding-system-for-write 'binary))
(jka-compr-call-process uncompress-program
(concat uncompress-message
" " base-name)
......@@ -855,7 +855,7 @@
;; Don't do multibyte encoding on the compressed files.
(when (boundp 'file-coding-system-alist)
(let ((elt (cons (jka-compr-info-regexp x)
'(no-conversion . no-conversion))))
'(binary . binary))))
(setq file-coding-system-alist
(cons elt file-coding-system-alist))
(setq jka-compr-added-to-file-coding-system-alist
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment