diff options
author | Karl Heuer <kwzh@gnu.org> | 1996-04-30 03:21:44 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1996-04-30 03:21:44 +0000 |
commit | ee0fc133ed3442f174856081654b3afe107eaee3 (patch) | |
tree | fed5ee4165da7c1948b58dc113b65356195eeadf /lisp/simple.el | |
parent | 739fc8ff639373e30bf0d291bc1aa50d7461cf88 (diff) | |
download | emacs-ee0fc133ed3442f174856081654b3afe107eaee3.tar.gz |
(shell-command-on-region): Start of region to keep is
min of endpoints, not max.
Diffstat (limited to 'lisp/simple.el')
-rw-r--r-- | lisp/simple.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 5617efa773d..829f39083d6 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -894,7 +894,7 @@ In either case, the output is inserted after point (leaving mark after it)." ;; then replace that region with the output. (progn (setq buffer-read-only nil) (delete-region (max start end) (point-max)) - (delete-region (point-min) (max start end)) + (delete-region (point-min) (min start end)) (call-process-region (point-min) (point-max) shell-file-name t t nil shell-command-switch command) |