Merge from emacs-23

[gnu-emacs] / lisp / format.el

diff --git a/lisp/format.el b/lisp/format.el
index 0436187d984c1ee163c5fea063b5bdfc9793d840..b4277ef6df0d4bb36b6dd775458c4c19f36dc1c5 100644 (file)
--- a/lisp/format.el
+++ b/lisp/format.el
@@ -181,8 +181,7 @@ it should be a Lisp function.  Decoding is done for the given BUFFER."
        ;; We should perhaps go via a temporary buffer and copy it
        ;; back, in case of errors.
        (if (and (zerop (save-window-excursion
-                         (shell-command-on-region (point-min) (point-max)
-                                                  method t t
+                         (shell-command-on-region from to method t t
                                                   error-buff)))
                 ;; gzip gives zero exit status with bad args, for instance.
                 (zerop (with-current-buffer error-buff