xyzzyのdabbrevで2ch-mode関係のバッファは補完対象としない
方法を探してたんですがXYZZYHOME\lisp\dabbrev.lを直でいじったらできた。あんまりスマートじゃないけどしゃーないか。emacs のようにdabbrev-ignored-buffer-names、dabbrev-ignored-buffer-regexps を用意してくれれば良いのだけれども。
さらに言うならこれが出来るようにdabbrev.lがなってると良い。
http://www.bookshelf.jp/soft/meadow_33.html#SEC440
ちなみに目的は「プログラム書いてる最中にdabbrevやると2ch-modeのバッファからも補完しようとして重い。」というのを解消するため。一番の解決策は2chやりながら仕事すんなってこと。
メモのためいじった関数の一部を書いておく。
いじったのは「(when (not (string-match " 2ch.*" name))」の一行とそれに対応する閉じカッコ。
(defun dabbrev-find-buffer (abbrev &optional buffer start)
・
・
(with-interval-message (300)
(save-excursion
(while (not (eq buffer curbuf))
(let *1
・
・
・
(use-syntax-table osyntax-table nil t)))
(when loc
(message "Searching (~A)...found" name)
(return t)))))
・
・
