mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(shell-command-on-region): Call push-mark with

Browse source 
non-nil second arg, to suppress the "Mark set" message.
This commit is contained in:
Eli Zaretskii 2002-03-09 09:06:04 +00:00
parent ad497129ba
commit 3088377355
2 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -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

2
lisp/simple.el
View file

@ -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