;;; siren-undo-tree.el --- jimeh's Emacs Siren: undo-tree configuration.

;;; Commentary:

;; Basic configuration for undo-tree.

;;; Code:

(use-package undo-tree
  :demand
  :general
  (:keymaps '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
   `((".*" . ,(siren-cache-dir "undo-tree-history"))))
  ;; Use undohist package to persist history to disk, it seems more reliable
  ;; than undo-tree's auto-save feature which randomly fails to restore history
  ;; for no obvious reason.
  (undo-tree-auto-save-history nil)
  (undo-tree-incompatible-major-modes '(term-mode vterm-mode))

  :config
  (global-undo-tree-mode)

  ;; 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