使 Aquamacs 滾動更像 Emacs

Question

當我使用 emacs 時，我曾經能夠設置標記並突出顯示整頁以使用 Cv 或向上滾動來拉動。 但是，在 Aquamacs 中，如果我設置標記然后點擊 Cv，它會丟失標記並停止突出顯示。 我注意到在 Aquamacs 中 Cv 被映射到 aquamacs-page-down，所以我嘗試將以下命令添加到我的站點文件中：

(define-key osx-key-mode-map "C-v" 'scroll-up)

這並沒有成功地重新映射密鑰。 然后我嘗試了類似的東西：

(define-key global-map "\C-v" 'scroll-up)

仍然沒有。 Aquamacs 非常固執地堅持到 aquamacs-page-down 的映射。 然而，我注意到還有一個額外的 function，aquamacs-page-down-extend-region，這正是我所說的。 然而，它的鍵序列是，我不知道如何輸入。 我試過“shift-control-v”無濟於事。

有沒有人能夠讓 Aquamacs 在保持標記的同時滾動頁面？

Answer 1

為了子孫后代，我已經找到了一種方法來讓它發揮作用。

將此粘貼到 .emacs 文件中：

;; Enable scrolling to maintain mark if set
(defun scroll-down-maintain-mark ()
  (interactive)
  (if mark-active
      (aquamacs-page-down-extend-region)
    (aquamacs-page-down)))

(defun scroll-up-maintain-mark ()
  (interactive)
  (if mark-active
      (aquamacs-page-up-extend-region)
    (aquamacs-page-up)))

(define-key global-map "\C-v" #'scroll-down-maintain-mark)
(define-key global-map "\M-v" #'scroll-up-maintain-mark)

Answer 2

點擊C-SPC Cv Cl ，最后一個重新定位的屏幕，似乎表明它確實保留了標記。

隨后的復制和拉動工作正常

也許這種行為是在較新的 Aquamacs 上添加的。