diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2019-03-10 23:08:37 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2019-03-10 23:11:21 -0700 |
| commit | e81c44fdb4110a1e5af97669c1a7ef8277528b6c (patch) | |
| tree | 42520d445baebffae83eae85391f9e3ebd56d6cb /lisp/comint.el | |
| parent | e2f35443796d423ea5f96a99da425a927327deb2 (diff) | |
| download | emacs-e81c44fdb4110a1e5af97669c1a7ef8277528b6c.tar.gz | |
More regexp corrections and tweaks
Problems reported by Mattias Engdegård in:
https://lists.gnu.org/r/emacs-devel/2019-03/msg00247.html
* lisp/align.el (align-rules-list):
* lisp/comint.el (comint-output-filter):
* lisp/language/china-util.el (encode-hz-region):
* lisp/progmodes/cperl-mode.el (cperl-indent-exp):
* lisp/progmodes/idlwave.el (idlwave-is-pointer-dereference):
* lisp/progmodes/scheme.el (dsssl-font-lock-keywords):
* lisp/textmodes/texinfmt.el (texinfo-accent-commands):
* test/src/regex-emacs-tests.el (regex-tests-re-even-escapes):
Fix some regular-expression typos.
Diffstat (limited to 'lisp/comint.el')
| -rw-r--r-- | lisp/comint.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/comint.el b/lisp/comint.el index a5fca7ea2a1..e5012be982b 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -2081,7 +2081,7 @@ Make backspaces delete the previous character." (prompt-re (concat "\\`" (regexp-quote prompt)))) (while (string-match prompt-re string) (setq string (substring string (match-end 0))))))) - (while (string-match (concat "\\(^" comint-prompt-regexp + (while (string-match (concat "\\(" comint-prompt-regexp "\\)\\1+") string) (setq string (replace-match "\\1" nil nil string))) |