[elpa] externals/shell-command+ 7942428 1/2: Insert expected flags into grep command

[ELPA Syncer]

branch: externals/shell-command+
commit 794242809672be8e78182e1d4164abc114f158c8
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    Insert expected flags into grep command
---
 shell-command+.el | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/shell-command+.el b/shell-command+.el
index aaad41d..79fff81 100644
--- a/shell-command+.el
+++ b/shell-command+.el
@@ -156,7 +156,13 @@ If EXPAND is non-nil, expand wildcards."
 
 (defun shell-command+-cmd-grep (command)
   "Convert COMMAND into a `grep' call."
-  (grep (mapconcat #'identity (shell-command+-tokenize command t) " ")))
+  (grep-compute-defaults)
+  (pcase-let ((`(,cmd . ,args) (shell-command+-tokenize command t)))
+    (grep (mapconcat #'identity
+                     (cons (replace-regexp-in-string
+                            (concat "\\`" grep-program) cmd grep-command)
+                           args)
+                     " "))))
 
 (defun shell-command+-cmd-find (command)
   "Convert COMMAND into a `find-dired' call."