# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 720175682 0
# Node ID 5004c07a82503a84b4a6c9f1d92cc446825b22e5
# Parent  d0d11fa0ecf57ce0d637ad8f3f94d6bb757afa75
(shell-command-on-region):
Use region-beginning and region-end, in interactive spec.

diff -r d0d11fa0ecf5 -r 5004c07a8250 lisp/simple.el
--- a/lisp/simple.el	Tue Oct 27 04:11:46 1992 +0000
+++ b/lisp/simple.el	Tue Oct 27 08:48:02 1992 +0000
@@ -664,7 +664,7 @@
 even though that buffer is not automatically displayed.  If there is no output
 or output is inserted in the current buffer then `*Shell Command Output*' is
 deleted." 
-  (interactive (list (min (point) (mark)) (max (point) (mark))
+  (interactive (list (region-beginning) (region-end)
 		     (read-string "Shell command on region: "
 				  last-shell-command-on-region)
 		     current-prefix-arg