--- a/.emacs-my	Wed Mar 23 11:02:09 2016 +0200
+++ b/.emacs-my	Wed Mar 23 11:09:44 2016 +0200
@@ -731,13 +731,13 @@
 (defun lzgrep ()
   (interactive)
   (let ( (grep-template "zgrep <C> -nH -e <R> <F>") (grep-find-ignored-files nil) )
-    (flet ( (grep-compute-defaults () 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) )
-    (flet ( (grep-compute-defaults () nil) )
+    (cl-flet ( (grep-compute-defaults () nil) )
       (call-interactively #'rgrep))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;