Commits

andreasj  committed 3db2065

Applied Jan's patch from <byaekrrfw6.fsf@bolzano.math.ethz.ch>
with subject "jka-compr patch for xemacs".

  • Participants
  • Parent commits d75e73e

Comments (0)

Files changed (2)

+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'

File jka-compr.el

 				     (jka-value-if-bound
 				           coding-system-for-read) 
 				     'undecided))
-	    (coding-system-for-write 'no-conversion))
+	    (coding-system-for-write 'binary))
 	    
 	(unwind-protect
 
 
 	    ;; 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)
 				      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
 		;; 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)
 	       ;; 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