Emacsでカーソルの位置に\verb||を入力する関数

実験のレポートを書いていて，頻繁に\verb||と入力する必要があって，指が疲れてきたので，カーソルの位置に\verb||を入力する関数を書いた．

;;カーソル位置にverb出す
(defun my-insert-verb()
  (interactive)
  (insert "\\verb||")
  (backward-char)
  )
(global-set-key "\C-c\C-v" 'my-insert-verb)

これで，C-cC-vすると，\verb||が挿入されて，カーソルが|と|の間に来る．
本当はyatex-modeのときだけ設定したかったのだけど，あと2，3日はTeXを書き続けるので，これでいいことにした．

おまけ

図\ref{}も出せるようにした

(defun my-insert-ref()
  (interactive)
  (insert "図\\ref{}")
  (backward-char)
  )
(global-set-key "\C-c\C-r" 'my-insert-ref)