Speed up counsel-grep by up to 40 times

[gnu-emacs-elpa] / counsel.el

diff --git a/counsel.el b/counsel.el
index 9c4dbf868a0cf50453f1ee3bf8c5049185682106..c64b10ef094d20f01bdcbf3ec04c6ba059f7977a 100644 (file)
--- a/counsel.el
+++ b/counsel.el
@@ -1383,7 +1383,7 @@ This uses `counsel-ag' with `counsel-pt-base-command' replacing
     (call-interactively 'counsel-ag)))
 
 ;;** `counsel-grep'
-(defcustom counsel-grep-base-command "grep -nE --ignore-case \"%s\" %s"
+(defcustom counsel-grep-base-command "grep -nE \"%s\" %s"
   "Format string to use in `cousel-grep-function' to construct
 the command."
   :type 'string
@@ -1869,6 +1869,12 @@ An extra action allows to switch to the process buffer."
                 :action action
                 :require-match t
                 :caller 'counsel-ace-link))))
+;;** `counsel-expression-history'
+;;;###autoload
+(defun counsel-expression-history ()
+  (interactive)
+  (ivy-read "Expr: " (delete-dups read-expression-history)
+            :action #'insert))
 
 ;;* Misc OS
 ;;** `counsel-rhythmbox'