mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-26 10:49:33 +00:00
(shell-command-on-region): Call push-mark with
non-nil second arg, to suppress the "Mark set" message.
This commit is contained in:
parent
ad497129ba
commit
3088377355
@ -1,3 +1,8 @@
|
||||
2002-03-09 Eli Zaretskii <eliz@is.elta.co.il>
|
||||
|
||||
* simple.el (shell-command-on-region): Call push-mark with
|
||||
non-nil second arg, to suppress the "Mark set" message.
|
||||
|
||||
2002-03-08 Andreas Schwab <schwab@suse.de>
|
||||
|
||||
* textmodes/texinfo.el: Change Maintainer to FSF, as requested by
|
||||
|
@ -1424,7 +1424,7 @@ specifies the value of ERROR-BUFFER."
|
||||
(let ((swap (and replace (< start end))))
|
||||
;; Don't muck with mark unless REPLACE says we should.
|
||||
(goto-char start)
|
||||
(and replace (push-mark))
|
||||
(and replace (push-mark (point) 'nomsg))
|
||||
(setq exit-status
|
||||
(call-process-region start end shell-file-name t
|
||||
(if error-file
|
||||
|
Loading…
Reference in New Issue
Block a user