emacs-lisp-mode での dabbrev-ignored-buffer-regexps の件

ドウモドウモ。
書くの忘れてました。

こないだは，".el" を指定すればいけるんじゃね?
的なことを書きましたが，それでは，だめなので，
.java の時と同様に，以下の様に修正しました。

(defun emacs-lisp-mode-hook-func ()
  (interactive)
  ...
  (make-local-variable 'dabbrev-ignored-buffer-regexps)
  (setq dabbrev-ignored-buffer-regexps '("^[^.]\\{1,\\}$" ;; ドットを含まない文字列
                                         "\\.\\(e[^l]\\|[^e].\\)$" ;; 拡張子2文字でel以外
                                         "\\..\\{1\\}$"  ;; 拡張子が1文字
                                         "\\..\\{3,\\}$")) ;; 拡張子が3文字以上
  (when (require 'auto-complete nil t)
    (make-local-variable 'ac-sources)
    (setq ac-auto-start 5)
    (setq ac-sources '(ac-source-words-in-buffer
                       ac-source-gtags
                       ac-source-dabbrev
                       ac-source-abbrev))))

(add-hook 'emacs-lisp-mode-hook 'emacs-lisp-mode-hook-func)

けどね，新たな問題が。。。
例えば foo.el<2> などの，suffix に<2>を持つバッファが除外されてしまうという点。
これは，foo.el というバッファが存在していない場合は，rename-buffer すればいいけど，
そうでない場合は困るね。
そのうち考えるかも。
だれか教えてくれてもいいんだからねっ!