diff options
| -rw-r--r-- | lisp/term.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/term.el b/lisp/term.el index a3933ae4a4f..5259571eb6d 100644 --- a/lisp/term.el +++ b/lisp/term.el | |||
| @@ -2903,12 +2903,12 @@ See `term-prompt-regexp'." | |||
| 2903 | (beep t)) | 2903 | (beep t)) |
| 2904 | ((and (eq char ?\032) | 2904 | ((and (eq char ?\032) |
| 2905 | (not handled-ansi-message)) | 2905 | (not handled-ansi-message)) |
| 2906 | (let ((end (string-match "\r?$" str i))) | 2906 | (let ((end (string-match "\r?\n" str i))) |
| 2907 | (if end | 2907 | (if end |
| 2908 | (funcall term-command-hook | 2908 | (funcall term-command-hook |
| 2909 | (decode-coding-string | 2909 | (decode-coding-string |
| 2910 | (prog1 (substring str (1+ i) end) | 2910 | (prog1 (substring str (1+ i) end) |
| 2911 | (setq i (match-end 0))) | 2911 | (setq i (1- (match-end 0)))) |
| 2912 | locale-coding-system)) | 2912 | locale-coding-system)) |
| 2913 | (setq term-terminal-parameter (substring str i)) | 2913 | (setq term-terminal-parameter (substring str i)) |
| 2914 | (setq term-terminal-state 4) | 2914 | (setq term-terminal-state 4) |