mirror of
https://github.com/jimeh/.emacs.d.git
synced 2026-02-19 13:46:41 +00:00
37 lines
849 B
EmacsLisp
37 lines
849 B
EmacsLisp
;;; siren-undo-tree.el --- jimeh's Emacs Siren: undo-tree configuration.
|
|
|
|
;;; Commentary:
|
|
|
|
;; Basic configuration for undo-tree.
|
|
|
|
;;; Code:
|
|
|
|
(use-package undo-tree
|
|
:hook
|
|
(emacs-startup . global-undo-tree-mode)
|
|
|
|
:bind
|
|
(:map undo-tree-map
|
|
("C-x u" . undo-tree-visualize)
|
|
("M--" . undo-tree-undo)
|
|
("M-_" . undo-tree-redo)
|
|
("s-z" . undo-tree-undo)
|
|
("s-Z" . undo-tree-redo))
|
|
|
|
:diminish
|
|
undo-tree-mode
|
|
|
|
:custom
|
|
(undo-tree-history-directory-alist
|
|
`((".*" . ,(expand-file-name "undo-tree-history" siren-cache-dir))))
|
|
(undo-tree-auto-save-history nil) ;; use undohist package instead
|
|
|
|
:config
|
|
;; Unbind keys that I don't use.
|
|
(unbind-key "C-/" undo-tree-map)
|
|
(unbind-key "C-?" undo-tree-map)
|
|
(unbind-key "C-_" undo-tree-map))
|
|
|
|
(provide 'siren-undo-tree)
|
|
;;; siren-undo-tree.el ends here
|