タブで補完がしたかったので

適当に

;;前に文字が無ければタブ、あれば補完
(defun text-tab-and-complete()
  (interactive)
  (if(dabbrev-expand)
	  () (insert #\TAB)))
(global-set-key '(#\TAB) 'text-tab-and-complete)

とかしてみた。一応動く感じ。ポップアップメニューで補完にしようかと思ったけど。タブ押しまくりが、良い感じ。ただ、補完候補がある状態で、普通タブを入力するのが面倒という罠も仕掛けられた。
まあ、そんな状況殆ど無いので、C-qでTabすればいいんだけどさ。