HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
c534823
)
(comint-goto-process-mark): Don't print a message
author
Gerd Moellmann
<gerd@gnu.org>
Thu, 11 Jan 2001 15:39:27 +0000
(15:39 +0000)
committer
Gerd Moellmann
<gerd@gnu.org>
Thu, 11 Jan 2001 15:39:27 +0000
(15:39 +0000)
when running in batch mode.
lisp/comint.el
patch
|
blob
|
blame
|
history
diff --git
a/lisp/comint.el
b/lisp/comint.el
index
dbe75ed
..
72e536c
100644
(file)
--- a/
lisp/comint.el
+++ b/
lisp/comint.el
@@
-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.