Mercurial > emacs
changeset 7756:4f68024e4fb0
(comint-read-input-ring): Make regexp stricter.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 30 May 1994 12:23:10 +0000 |
| parents | 6191acd134b6 |
| children | 8d27747de7ca |
| files | lisp/comint.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/comint.el Mon May 30 11:55:22 1994 +0000 +++ b/lisp/comint.el Mon May 30 12:23:10 1994 +0000 @@ -627,7 +627,7 @@ (save-restriction (widen) (goto-char (point-min)) - (while (re-search-forward "^\\s *\\([^#].*\\)\\s *$" nil t) + (while (re-search-forward "^[ \t]*\\([^#\n].*\\)[ \t]*$" nil t) (let ((history (buffer-substring (match-beginning 1) (match-end 1)))) (if (or (null comint-input-ignoredups)