Mercurial > emacs
changeset 5880:7051027369d6
(shell-get-current-command): Make regexp more selective.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 10 Feb 1994 08:35:48 +0000 |
| parents | 66aadd6ba5e6 |
| children | 678a8470e4d1 |
| files | lisp/shell.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/shell.el Thu Feb 10 07:39:09 1994 +0000 +++ b/lisp/shell.el Thu Feb 10 08:35:48 1994 +0000 @@ -625,7 +625,7 @@ (defun shell-get-current-command () "Function that returns the current command including arguments." (save-excursion - (if (looking-at "\\s *[^;&|]") + (if (looking-at "[\t ]*[^;&|\n]") (goto-char (match-end 0))) (buffer-substring (progn (shell-backward-command 1) (point))