Mercurial > hg > xemacs-beta

diff lisp/packages/jka-compr.el @ 155:43dd3413c7c7 r20-3b4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b4
author cvs
date Mon, 13 Aug 2007 09:39:39 +0200
parents 1856695b1fa9
children 489f57a838ef
line wrap: on
line diff
--- a/lisp/packages/jka-compr.el	Mon Aug 13 09:38:27 2007 +0200
+++ b/lisp/packages/jka-compr.el	Mon Aug 13 09:39:39 2007 +0200
@@ -450,7 +450,8 @@
 	    (jka-compr-run-real-handler 'write-region
 					(list (point-min) (point-max)
 					      filename
-					      (and append can-append) 'dont lockname coding-system))
+					      (and append can-append)
+					      'dont lockname 'binary))
 	    (erase-buffer)
 	    (set-buffer cbuf)