diff options
| author | Case Duckworth | 2021-08-11 22:04:41 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-08-11 22:04:41 -0500 |
| commit | 6ad0efeee6cce4fdaa0fd42f79a8273fd7b8ce75 (patch) | |
| tree | bee121bf30398fe00be55f4f634ad51f6439b91f | |
| parent | Set up eshell prompt for outline (diff) | |
| download | emacs-6ad0efeee6cce4fdaa0fd42f79a8273fd7b8ce75.tar.gz emacs-6ad0efeee6cce4fdaa0fd42f79a8273fd7b8ce75.zip | |
Recenter cursor on page after navigating pages
| -rw-r--r-- | init.el | 7 |
1 files changed, 7 insertions, 0 deletions
| diff --git a/init.el b/init.el index c6370a0..6938282 100644 --- a/init.el +++ b/init.el | |||
| @@ -605,6 +605,13 @@ like a dumbass." | |||
| 605 | (minibuffer-electric-default-mode +1) | 605 | (minibuffer-electric-default-mode +1) |
| 606 | (fset 'yes-or-no-p #'y-or-n-p)) | 606 | (fset 'yes-or-no-p #'y-or-n-p)) |
| 607 | 607 | ||
| 608 | (setup page | ||
| 609 | (defun recenter-to-top (&rest _args) | ||
| 610 | "Recenter the cursor to the top of the window." | ||
| 611 | (recenter 0)) | ||
| 612 | (:advise forward-page :after #'recenter-to-top | ||
| 613 | backward-page :after #'recenter-to-top)) | ||
| 614 | |||
| 608 | (setup prog | 615 | (setup prog |
| 609 | (:option smie-indent-basic tab-width) | 616 | (:option smie-indent-basic tab-width) |
| 610 | 617 | ||