From: Eli Zaretskii Date: Fri, 21 Dec 2001 12:43:55 +0000 (+0000) Subject: (jka-compr-partial-uncompress): Use null-device instead of a literal X-Git-Tag: ttn-vms-21-2-B4~17559 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=152e2693f1c893ddf58bfdd77d07abd66c6b6f74;p=emacs.git (jka-compr-partial-uncompress): Use null-device instead of a literal /dev/null. Reported by Jens Schmidt . --- diff --git a/lisp/jka-compr.el b/lisp/jka-compr.el index 5c42a0af8be..0521d9840fc 100644 --- a/lisp/jka-compr.el +++ b/lisp/jka-compr.el @@ -300,7 +300,7 @@ to keep: LEN chars starting BEG chars from the beginning." (or (memq (call-process jka-compr-shell infile t nil "-c" (format - "%s %s 2> %s | %s bs=%d skip=%d %s 2> /dev/null" + "%s %s 2> %s | %s bs=%d skip=%d %s 2> %s" prog (mapconcat 'identity args " ") err-file @@ -310,7 +310,8 @@ to keep: LEN chars starting BEG chars from the beginning." ;; dd seems to be unreliable about ;; providing the last block. So, always ;; read one more than you think you need. - (if count (format "count=%d" (1+ count)) ""))) + (if count (format "count=%d" (1+ count)) "") + null-device)) jka-compr-acceptable-retval-list) (jka-compr-error prog args infile message err-file)) (jka-compr-delete-temp-file err-file)))