bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: term.el (term-emulate-terminal)


From: Eli Zaretskii
Subject: Re: term.el (term-emulate-terminal)
Date: Sat, 13 Apr 2002 18:36:53 +0300

> From: Harry Kuiper <address@hidden>
> Date: 13 Apr 2002 15:40:54 +0200
> 
> I looked at the diffs between term.el in Emacs-21.1 and Emacs-21.2
> using these I backed out the change Eli Zaretskii made at 2002-02-03
> (see below, something about matching terminal prompt).  After that
> term works OK again for me.

Actually, this change was suggested by Daiki Ueno; I was asked
(probably by Richard Stallman) to install it.

The bug which the change was supposed to fix is explained here:

  http://mail.gnu.org/pipermail/bug-gnu-emacs/2002-January/010123.html

> <<<<< Eli's changes I backed out. >>>>>
> 
> + 2002-02-03  Eli Zaretskii  <address@hidden>
> + 
> +     * term.el (term-emulate-terminal): Extract proper command string
> +     which is supplied to term-command-hook.
> + 
> 
> --- 797,814 ----
> *************** See `term-prompt-regexp'."
> *** 2856,2864 ****
>                           (beep t)) ; Bell
>                          ((eq char ?\032)
> !                         (let ((end (string-match "\n" str i)))
>                             (if end
>                                 (progn (funcall term-command-hook
> !                                               (substring str (1+ i) (1- 
> end)))
> !                                      (setq i end))
>                               (setq term-terminal-parameter
>                                     (substring str i))
> --- 2831,2839 ----
>                           (beep t)) ; Bell
>                          ((eq char ?\032)
> !                         (let ((end (string-match "\r?$" str i)))
>                             (if end
>                                 (progn (funcall term-command-hook
> !                                               (substring str (1+ i) end))
> !                                      (setq i (match-end 0)))
>                               (setq term-terminal-parameter
>                                     (substring str i))
> <<<<< End >>>>>



reply via email to

[Prev in Thread] Current Thread [Next in Thread]