--- a/.emacs-my Thu Mar 09 15:11:29 2017 +0200
+++ b/.emacs-my Sat Mar 25 02:06:03 2017 +0300
@@ -802,21 +802,8 @@
(add-to-list 'grep-find-ignored-files "*TAGS")
(add-to-list 'grep-find-ignored-files "GPATH")) )
-(global-set-key [f7] 'rgrep)
(global-set-key [M-f7] 'rgrep)
-(defun lzgrep ()
- (interactive)
- (let ( (grep-template "zgrep <C> -nH -e <R> <F>") (grep-find-ignored-files nil) )
- (cl-flet ( (grep-compute-defaults () nil) )
- (call-interactively #'lgrep))))
-
-(defun rzgrep ()
- (interactive)
- (let ( (grep-find-template "find . -type f <F> -exec zgrep <C> -nH -e <R> {} +") (grep-find-ignored-files nil) )
- (cl-flet ( (grep-compute-defaults () nil) )
- (call-interactively #'rgrep))))
-
(global-set-key [f7] 'my/ag)
(global-set-key [S-f7] 'my/ag-default-directory)