branch: externals/shell-command+
commit 9b1d98ee2ed56fe4bbb8a64d1cb868a7a99b564b
Author: Philip K <phil...@posteo.net>
Commit: Philip K <phil...@posteo.net>

    Fix shell-command+-cmd-grep invocation
---
 shell-command+.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/shell-command+.el b/shell-command+.el
index 297936f..92c32d8 100644
--- a/shell-command+.el
+++ b/shell-command+.el
@@ -156,9 +156,7 @@ If EXPAND is non-nil, expand wildcards."
 
 (defun shell-command+-cmd-grep (command)
   "Convert COMMAND into a `grep' call."
-  (pcase-let ((`(,command . ,args) (shell-command+-tokenize command t)))
-    (let ((grep-command command))
-      (grep (mapconcat #'identity args " ")))))
+  (grep (mapconcat #'identity (shell-command+-tokenize command t) " ")))
 
 (defun shell-command+-cmd-find (command)
   "Convert COMMAND into a `find-dired' call."

Reply via email to