This demo's Elisp:color-moccur.el
.emacs of this example
(setq moccur-use-ee t)
(setq moccur-split-word t)
(setq *moccur-buffer-name-exclusion-list*
'(".+TAGS.+" "*Completions*" "*Messages*"))
(setq dmoccur-use-list t)
(setq dmoccur-list
'(
("emacs" "d:/unix/Meadow2/2.00b2/lisp/net/" ("\\.el$") nil)
("dir" "d:/unix/Meadow2/2.00b2/lisp/" ("\\.el$") dir)
))
(load "color-moccur")
(define-key dired-mode-map "O" 'dired-do-moccur)
(define-key Buffer-menu-mode-map "O" 'Buffer-menu-moccur)
|