aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorLawrence Mitchell2010-12-06 14:35:54 -0500
committerChong Yidong2010-12-06 14:35:54 -0500
commit3ecba0495e877769d3b29f67f0648af39352edb8 (patch)
tree1b0133c6dd6df6cf46fc3990ab03c709b665c26b /lisp
parentd8b2a96214c9b53ab914901fdde71f5b0a931678 (diff)
downloademacs-3ecba0495e877769d3b29f67f0648af39352edb8.tar.gz
emacs-3ecba0495e877769d3b29f67f0648af39352edb8.zip
Fix arg usage of format-decode-run-method (Bug#7488).
* lisp/format.el (format-decode-run-method): Pass args FROM and TO, not point-min and point-max, to shell-command-on-region (Bug#7488).
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/format.el3
2 files changed, 6 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 125ce3351ba..88fcbc850be 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12010-12-06 Lawrence Mitchell <lawrence.mitchell@ed.ac.uk>
2
3 * format.el (format-decode-run-method): Pass args FROM and TO, not
4 point-min and point-max, to shell-command-on-region (Bug#7488).
5
12010-12-06 Jan Djärv <jan.h.d@swipnet.se> 62010-12-06 Jan Djärv <jan.h.d@swipnet.se>
2 7
3 * frame.el (blink-cursor-mode): Make default t for ns. 8 * frame.el (blink-cursor-mode): Make default t for ns.
diff --git a/lisp/format.el b/lisp/format.el
index d4262e2d0e6..8f2ef2c39a5 100644
--- a/lisp/format.el
+++ b/lisp/format.el
@@ -180,8 +180,7 @@ it should be a Lisp function. Decoding is done for the given BUFFER."
180 ;; We should perhaps go via a temporary buffer and copy it 180 ;; We should perhaps go via a temporary buffer and copy it
181 ;; back, in case of errors. 181 ;; back, in case of errors.
182 (if (and (zerop (save-window-excursion 182 (if (and (zerop (save-window-excursion
183 (shell-command-on-region (point-min) (point-max) 183 (shell-command-on-region from to method t t
184 method t t
185 error-buff))) 184 error-buff)))
186 ;; gzip gives zero exit status with bad args, for instance. 185 ;; gzip gives zero exit status with bad args, for instance.
187 (zerop (with-current-buffer error-buff 186 (zerop (with-current-buffer error-buff