emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/shell-command+ 9b1d98e 06/13: Fix shell-command+-cmd-gr


From: Stefan Monnier
Subject: [elpa] externals/shell-command+ 9b1d98e 06/13: Fix shell-command+-cmd-grep invocation
Date: Sun, 23 May 2021 13:41:26 -0400 (EDT)

branch: externals/shell-command+
commit 9b1d98ee2ed56fe4bbb8a64d1cb868a7a99b564b
Author: Philip K <philipk@posteo.net>
Commit: Philip K <philipk@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

[Prev in Thread] Current Thread [Next in Thread]