Deixe o Emacs mover o cursor para fora da tela

Esta pergunta foi originalmente feita em /programming/15895313/let-emacs-move-the-cursor-off-screen , mas todas as respostas que obtive mais ou menos disseram "não pode ser feito" , que com o emacs eu simplesmente não aceito.

É possível deixar o Emacs mover o cursor para fora da tela, como a maioria dos editores de texto da GUI funciona? Essa é uma das maiores coisas que me incomoda quando uso o Emacs sobre qualquer editor de GUI. Quando desloco para baixo, o cursor é "empurrado para frente" pela parte superior do buffer.

Anteriormente, eu pensava que isso era completamente impossível, porque isso está ligado à arquitetura do Emacs, mas vi vários cursores, o que faz exatamente isso para os cursores secundários (supondo que você impeça as funções de rolagem de atuar no secundário) cursores). Talvez seja possível usar cursores múltiplos para ter o cursor principal em algum buffer oculto, e o cursor efetivo é o que eu realmente edito? Ou talvez algum outro truque inteligente? Ou talvez meu Google tenha falhado comigo e isso já é possível sem mágica?

Eu uso o emacs do terminal, por isso deve funcionar lá.

Há um novo pacote disponível no GNU ELPA chamado scroll-restoreque tenta solucionar esse problema. Existem vários comportamentos diferentes para escolher, mas a maneira como eu o configurei (veja abaixo) faz com que o cursor fique invisível durante os comandos de rolagem e depois volte ao seu local original quando eu começar a digitar novamente.

Até agora, encontrei alguns bugs, mas o pacote parece funcionar como anunciado na maior parte. Você pode testá-lo instalando-o com

M-x package-install RET scroll-restore RET

Após a instalação do pacote, você pode ativar o modo secundário com

M-x scroll-restore-mode

Pessoalmente, estou vinculando-o à Scroll Lockchave porque parece incrivelmente apropriado! Isto é o que estou adicionando ao meu arquivo init:

(require 'scroll-restore)
(scroll-restore-mode 1)
;; Allow scroll-restore to modify the cursor face
(setq scroll-restore-handle-cursor t)
;; Make the cursor invisible while POINT is off-screen
(setq scroll-restore-cursor-type nil)
;; Jump back to the original cursor position after scrolling
(setq scroll-restore-jump-back t)
;; Toggle scroll-restore-mode with the Scroll Lock key
(global-set-key (kbd "<Scroll_Lock>") 'scroll-restore-mode)

O método que eu sempre uso é definir a marca para a qual quero voltar e, quando terminar de ler o buffer, mostro a marca usando C-u C-SPC. Mesmo quando eu esqueço de marcar a marca antes de me afastar, percebo que esse tipo de marca geralmente me deixa bem perto de onde vim. Isso se deve em parte ao fato de que alguns comandos (como isearchpor exemplo) definem a marca sem você perceber. Assim, ao longo de sua edição, você inadvertidamente deixou uma pequena trilha de migalhas de pão.

A partir da documentação:

set-mark-command is an interactive compiled Lisp function in `simple.el'.

It is bound to C-@, C-SPC.

(set-mark-command ARG)

....

With prefix argument (e.g., C-u C-SPC), jump to the mark, and set the mark
from position popped off the local mark ring (this does not affect the global
mark ring).  Use C-x C-@ to jump to a mark popped off the global mark ring
(see `pop-global-mark').

Quase nunca me preocupo com a definição de marcadores ou registros, mas quase sempre consigo encontrar o caminho de volta de onde vim rapidamente usando um C-u C-SPCou outro pop-global-mark.

O código a seguir é bom o suficiente para eu voltar depois da rolagem da roda do mouse:

(advice-add 'mwheel-scroll :before (lambda (arg) (if (not (eq last-command 'mwheel-scroll)) (setq point-before-mwheel-scroll (window-point)))))
(defun jump-back () (goto-char point-before-mwheel-scroll))