diff options
| author | Blake Romero <blake@developercraft.com> | 2025-10-12 18:24:08 +0100 |
|---|---|---|
| committer | Blake Romero <blake@developercraft.com> | 2025-10-12 18:24:08 +0100 |
| commit | ed5afdd530988bdf12ffda23cac8c4b147834985 (patch) | |
| tree | 2c4f548a0e111ec57e8b2aa0ef9c603a4ad002fc /emacs-config.org | |
| parent | 3f6835f49850984c3612a33bf75a1d24cf7dce2c (diff) | |
Configure view mode
Diffstat (limited to 'emacs-config.org')
| -rw-r--r-- | emacs-config.org | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/emacs-config.org b/emacs-config.org index b6f8aa3..aa689a7 100644 --- a/emacs-config.org +++ b/emacs-config.org @@ -1444,6 +1444,31 @@ Enable eglot for certain modes. (add-hook 'c++-mode-hook #'eglot-ensure) #+end_src +** View Mode + +Simplify navigation when using view mode. +#+begin_src elisp + (setq-default view-read-only t) + + (with-eval-after-load 'view + (keymap-set view-mode-map "p" #'previous-line) ; replaces #'View-search-last-regexp-backward + (keymap-set view-mode-map "n" #'next-line) ; replaces #'View-search-last-regexp-forward + (keymap-set view-mode-map "f" #'forward-word) + (keymap-set view-mode-map "b" #'backward-word) + (keymap-set view-mode-map "m" #'back-to-indentation) ; replaces #'point-to-register + (keymap-set view-mode-map "a" #'move-beginning-of-line) + (keymap-set view-mode-map "e" #'move-end-of-line) ; replaces #'view-exit + (keymap-set view-mode-map "o" #'other-window) ; replaces #'View-scroll-to-buffer-end + (keymap-set view-mode-map "i" #'View-exit) + ) + + ;; make sure the cursor is changed visually + (setq-default cursor-type 'bar) + (add-hook 'view-mode-hook + (lambda () + (setq-default cursor-type (if view-mode 'box 'bar)))) +#+end_src + * Global Keybindings Unlock previously unusable keybinding. #+begin_src elisp |