procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* comint.el (comint-redirect-results-list-from-process): Fix

Browse source 
infinite loop.
This commit is contained in:
Leo Liu 2013-06-21 17:37:04 +08:00
parent d80a808f8d
commit aed838b5ab
2 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2013-06-21 Leo Liu <sdl.web@gmail.com>
* comint.el (comint-redirect-results-list-from-process): Fix
infinite loop.
2013-06-21 Lars Magne Ingebrigtsen <larsi@gnus.org>
* net/eww.el (eww-update-header-line-format): Quote % characters.

5
lisp/comint.el
View file

@ -3733,12 +3733,13 @@ REGEXP-GROUP is the regular expression group in REGEXP to use."
;; Skip past the command, if it was echoed
(and (looking-at command)
(forward-line))
(while (re-search-forward regexp nil t)
(while (and (not (eobp))
(re-search-forward regexp nil t))
(push (buffer-substring-no-properties
(match-beginning regexp-group)
(match-end regexp-group))
results))
results)))
(nreverse results))))
;; Converting process modes to use comint mode
;; ===========================================================================