原版的 scroll-up-command
和 scroll-downcommand
是有一个可选参数表示要滚动几行的,直接 alias 就没这个可选参数了。我写了一个简单的包装,试了一下应该能用:
(defun +my-scroll-up (&optional lines)
(interactive)
(if lines
(pixel-scroll-precision-interpolate (* -1 lines (pixel-line-height)))
(pixel-scroll-interpolate-up)))
(defun +my-scroll-down (&optional lines)
(interactive)
(if lines
(pixel-scroll-precision-interpolate (* lines (pixel-line-height))))
(pixel-scroll-interpolate-down))
话说本站的代码块里 Elisp 的名字是什么呀?我试了 elisp 和 emacs-lisp 都没有高亮