# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 928977573 0
# Node ID f88179cfae998354f19f9279c65bda2b8c6f4b4a
# Parent  7b6625bfb652c29994714cd07cdde721e7227c2b
(shell-command): Avoid printing "mark set" message.

diff -r 7b6625bfb652 -r f88179cfae99 lisp/simple.el
--- a/lisp/simple.el	Wed Jun 09 17:57:05 1999 +0000
+++ b/lisp/simple.el	Thu Jun 10 01:19:33 1999 +0000
@@ -1142,7 +1142,7 @@
 			     (make-temp-name "scor"))
 		   nil)))
 	    (barf-if-buffer-read-only)
-	    (push-mark)
+	    (push-mark nil t)
 	    ;; We do not use -f for csh; we will not support broken use of
 	    ;; .cshrcs.  Even the BSD csh manual says to use
 	    ;; "if ($?prompt) exit" before things which are not useful