Navigator for 2ch

もなー板で「ちょいと」だけスクロールしたい事が多いので、
[(control return)]、[(control backspace)]で、
それぞれ前、後ろに一行scrollするようにしてみました。
navi2ch-010610へのpatchです。

41a42,47
> (define-key navi2ch-article-mode-map [(control backspace)]
> '(lambda (&optional n) (interactive "P")
> (if n (navi2ch-article-scroll-down n) (navi2ch-article-scroll-down 1))))
> (define-key navi2ch-article-mode-map [(control return)]
> '(lambda (&optional n) (interactive "P")
> (if n (navi2ch-article-scroll-up n) (navi2ch-article-scroll-up 1))))
828,829c834,835
< (defun navi2ch-article-scroll-up ()
< (interactive)
---
> (defun navi2ch-article-scroll-up (&optional n)
> (interactive "P")
831c837
< (scroll-up)
---
> (scroll-up n)
836,837c842,843
< (defun navi2ch-article-scroll-down ()
< (interactive)
---
> (defun navi2ch-article-scroll-down (&optional n)
> (interactive "P")
839c845
< (scroll-down)
---
> (scroll-down n)