Navi2ch for Emacs (Part 12)

[0570 名無しさん＠お腹いっぱい。 NG NG]

;; FSF Emacs 21.3.50 では使えてますが何か

(when (featurep 'mwheel)
  (define-key navi2ch-article-mode-map `[,mouse-wheel-down-event]
  'navi2ch-article-previous-message)
  (define-key navi2ch-article-mode-map `[,mouse-wheel-up-event]
  'navi2ch-article-next-message))