moccur-grep でディレクトリ入力するの面倒。ファイルパターンも面倒。 これで良いのではないだろうか。 (defun my-moccur-grep (search-reg) (interactive "sSearch Regexp: ") (let ((file-patterns '("\\.cpp$" "\\.h$" "^Makefile$" "\\.scm$" "\\.ss$")…