mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

(comint-goto-process-mark): Don't print a message

Browse source 
when running in batch mode.
This commit is contained in:
Gerd Moellmann 2001-01-11 15:39:27 +00:00
parent c5348233d2
commit bec04ade3a
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/comint.el
View file

@ -2703,7 +2703,8 @@ from input that has not yet been sent."
(let ((proc (or (get-buffer-process (current-buffer))
(error "Current buffer has no process"))))
(goto-char (process-mark proc))
(message "Point is now at the process mark")))
(when (interactive-p)
(message "Point is now at the process mark"))))
(defun comint-bol-or-process-mark ()
"Move point to beginning of line (after prompt) or to the process mark.