Emacs:cua 模式有更好的 PgDn/PgUp 行为吗？

Question

我希望 PgUp 和 PgDn 键只是向上或向下移动显示文件的内容，但光标(在 Emacs Lingo 中的点)应该停留在它所在的位置(在屏幕上)。不幸的是，默认的 Emacs 行为是不同的。默认行为很难描述，但是如果您按 PgDn 后按 PgUp，您将不会回到之前的位置 (!)。

这不是一个新问题，有一个很好的解决方案，叫做 sfp-page-up and sfp-page-down在 EmacsWiki .

(defun sfp-page-up ()
  (interactive)
  (setq this-command 'previous-line)
  (previous-line
   (- (window-text-height)
      next-screen-context-lines)))

但是，与 cua 结合使用时存在一个问题。 -mode，它提供(除其他外)移位选择(按 Shift 和光标移动键，如 ← 或 PgDn 开始突出显示选定区域):
cua-mode无法识别重新定义的 PgUp/PgDn 键，即它们不会启动选择。解决方法是先按 ↑ 或 ↓ 键，然后继续 PgUp/PgDn。

我该如何制作 cua-mode和 sfp-page-up/down 玩得很好?

Answer 1

如果您添加 ^开始(interactive "...")函数的规范(在双引号内)，它们将支持 Emacs 23.1 及更高版本中的移位选择。