>>806
> と書くのでは、一つ目の方ではtext-mode-hook以外にも適用されてしまうと
text-mode-hook が実行? されるバッファ以外にもだけれど、合ってる。

(add-hook 'emacs-lisp-mode-hook
         (lambda ()
         (add-hook 'input-method-activate-hook (lambda() (set-cursor-color "yellow")) nil 'local)))