nebkor/emacs-dot-d
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

add fancier hook for undo-tree

Browse source
This commit is contained in:
Joe Ardent 2025-01-04 12:12:39 -08:00
parent 29b9be98bf
commit 6cb14c05b8
2 changed files with 12 additions and 6 deletions

7
nebkor-emacs.org
View file

@ -1507,9 +1507,12 @@ Open a nodal history graph in a new window to navigate all previous histories wi
#+begin_src emacs-lisp :tangle "nebkor-modules/nebkor-essentials.el" #+begin_src emacs-lisp :tangle "nebkor-modules/nebkor-essentials.el"
(use-package undo-tree (use-package undo-tree
:ensure t :ensure t
:init :config
(defun nebkor/undo-tree ()
(progn
(global-undo-tree-mode) (global-undo-tree-mode)
(blackout 'undo-tree-mode) (blackout 'undo-tree-mode)))
:hook (elpaca-after-init . nebkor/undo-tree)
:bind (("C-z" . undo) :bind (("C-z" . undo)
("C-S-z" . redo))) ("C-S-z" . redo)))
#+end_src #+end_src

7
nebkor-modules/nebkor-essentials.el
View file

@ -210,9 +210,12 @@ If the region is selected, retain the original behaviour, otherwise call
(use-package undo-tree (use-package undo-tree
:ensure t :ensure t
:init :config
(defun nebkor/undo-tree ()
(progn
(global-undo-tree-mode) (global-undo-tree-mode)
(blackout 'undo-tree-mode) (blackout 'undo-tree-mode)))
:hook (elpaca-after-init . nebkor/undo-tree)
:bind (("C-z" . undo) :bind (("C-z" . undo)
("C-S-z" . redo))) ("C-S-z" . redo)))