by shigemk2

当面は技術的なことしか書かない

キーバインドを使うように強制させる鬼軍曹.el

正式名称はdrill-instructor.el
鬼軍曹の英訳なのかな?
こちら
鬼軍曹.el · k1LoW/emacs-drill-instructor Wiki · GitHub
から、drill-instructor.elを落として設定ファイルに、

(require 'drill-instructor)
(setq drill-instructor-global t)

と書くだけ。
M-x drill-instructorで鬼軍曹.elが起動します。
方向キー、タブキー、DEL、BackSpaceを押すと、

Don't use down-key!!! Press C-n!! M-n!!!

みたいなのがミニバッファに表示されつつ、キーの打鍵が無効になる。

ちなみに、
鬼軍曹.elを真の鬼にする - delirious thoughts
君は、設定ファイルをこのように書いてもいいし、書かなくてもいい。

(require 'drill-instructor)
(setq drill-instructor-global t)
;; ↓ここから追加
(mapc (lambda (name)
        (fset name 'kill-emacs))
      '(drill-instructor-alert-up
        drill-instructor-alert-down
        drill-instructor-alert-right
        drill-instructor-alert-left
        drill-instructor-alert-del
        drill-instructor-alert-return
        drill-instructor-alert-tab))