counsel.el (counsel-git-grep): Add optional initial-input

* counsel.el (counsel-git-grep): Update.

Fixes #66

diff --git a/counsel.el b/counsel.el
index f41608d8322b837687f43f3766d8d141e2bb72bd..27825fe9d7ed3664eeba34d1eb223fe593e3fac0 100644 (file)
--- a/counsel.el
+++ b/counsel.el
@@ -219,7 +219,7 @@
         (setq ivy--full-length (counsel-git-grep-count ivy-text)))
       (split-string res "\n" t))))
 
-(defun counsel-git-grep ()
+(defun counsel-git-grep (&optional initial-input)
   "Grep for a string in the current git repository."
   (interactive)
   (unwind-protect
@@ -236,7 +236,8 @@
                                           (setq swiper--window (selected-window))
                                           (swiper--cleanup)
                                           (swiper--add-overlays (ivy--regex ivy-text)))))
-              (val (ivy-read "pattern: " 'counsel-git-grep-function)))
+              (val (ivy-read "pattern: " 'counsel-git-grep-function
+                             :initial-input initial-input)))
          (when val
            (funcall ivy--persistent-action val)))
     (swiper--cleanup)))