                                (if recursive " -R" "")
                                (if recursive "." "./*"))))
                     (helm-grep-default-recurse-command helm-grep-default-command))
-               (message "-- %s (%s)" helm-grep-default-command query)
                (setq helm-source-grep
                      (helm-build-async-source (capitalize (helm-grep-command t))
                        :header-name (lambda (_name) "Helm Projectile Grep (C-c ? Help)")

                   (when all-files "-a")
                   (unless recursive "--depth 1")))))
         (helm-ag-base-command (string-join command " ")))
    (setq helm-ag--last-query query)
    (helm-attrset 'search-this-file nil helm-ag-source)
    (helm-attrset 'name (helm-ag--helm-header helm-ag--default-directory) helm-ag-source)
    (helm :sources '(helm-ag-source)
          :input query
          :prompt prompt
          :buffer "*helm-ag*"
          :keymap helm-ag-map
          :history 'helm-ag--helm-history)))

;;;###autoload
(defun +helm/project-search (arg)

         (directory (or in project-root))
         (default-directory directory)
         (helm-ag--default-directory directory)
         (helm-ag--default-target (list directory))
         (engine (or engine
                     (and (executable-find "rg") 'rg)
                     (and (executable-find "ag") 'ag)
