From 092af46eea42328e8555701201512ffe83f3bf13 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 6 Jul 2002 13:25:16 +0000 Subject: [PATCH] (shell-command): Match & only at end of whole command. --- lisp/ChangeLog | 4 ++++ lisp/simple.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 9fe06e2b5f8..a2efbdd9bbc 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2002-07-06 Richard M. Stallman + + * simple.el (shell-command): Match & only at end of whole command. + 2002-07-03 Dave Love * ediff-diff.el (ediff-wordify): Bind ediff-forward-word-function diff --git a/lisp/simple.el b/lisp/simple.el index de998269ecf..56cdb452e60 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -1265,7 +1265,7 @@ specifies the value of ERROR-BUFFER." (current-buffer))))) ;; Preserve the match data in case called from a program. (save-match-data - (if (string-match "[ \t]*&[ \t]*$" command) + (if (string-match "[ \t]*&[ \t]*\\'" command) ;; Command ending with ampersand means asynchronous. (let ((buffer (get-buffer-create (or output-buffer "*Async Shell Command*"))) -- 2.39.2