--- a/.emacs-my	Wed Oct 26 15:58:03 2011 +0300
+++ b/.emacs-my	Wed Nov 02 12:10:16 2011 +0200
@@ -514,6 +514,9 @@
      (add-to-list 'grep-find-ignored-directories "build" t)
      (add-to-list 'grep-find-ignored-directories "dist" t)
      (add-to-list 'grep-find-ignored-directories "lib" t)
+     (add-to-list 'grep-find-ignored-directories "_build" t)
+     (add-to-list 'grep-find-ignored-directories "_dist" t)
+     (add-to-list 'grep-find-ignored-directories "_lib" t)
 
      (when (boundp 'grep-find-ignored-files)
        (add-to-list 'grep-find-ignored-files "*TAGS")