(require 'cursor-chg)

;;; デフォルトのカーソルの色はピンク
(setq curchg-default-cursor-color "Pink")
;;; デフォルトのカーソルの形状はbox
(setq curchg-default-cursor-type 'box)
;;; overwrite/read-onlyのカーソルの形状はbar
(setq curchg-overwrite/read-only-cursor-type 'bar)
;;; カーソル形状の変更を有効！
(change-cursor-mode 1)

;;; 5秒のアイドル時にもカーソルをhbarに変更させる
;;; 以下の3行はお好みで
(toggle-cursor-type-when-idle 1)
(setq curchg-idle-cursor-type 'hbar)
(curchg-change-cursor-when-idle-interval 5)