aboutsummaryrefslogtreecommitdiffstats
path: root/modules/init-editing-utils.el
diff options
context:
space:
mode:
Diffstat (limited to 'modules/init-editing-utils.el')
-rw-r--r--modules/init-editing-utils.el27
1 files changed, 21 insertions, 6 deletions
diff --git a/modules/init-editing-utils.el b/modules/init-editing-utils.el
index 8f57f21..35e34d1 100644
--- a/modules/init-editing-utils.el
+++ b/modules/init-editing-utils.el
@@ -51,14 +51,29 @@
;; Undo-tree
;;----------------------------------------------------------------------------
(use-package undo-tree
+ :demand t
:diminish undo-tree-mode
+ :bind (("C-x u" . undo-tree-visualizer)
+ (:map
+ undo-tree-visualizer-mode-map ("RET" . undo-tree-visualizer-quit)))
+ :init
+ (defadvice undo-tree-make-history-save-file-name
+ (after undo-tree activate)
+ (setq ad-return-value (concat ad-return-value ".7z")))
+
+ (defadvice undo-tree-visualize (around undo-tree-split-side-by-side activate)
+ "Divide la ventana de lado a lado al visualizar undo-tree-visualize"
+ (let ((split-height-threshold nil)
+ (split-width-threshold 0))
+ ad-do-it))
+
+ (setf undo-tree-visualizer-timestamps t)
+ (setf undo-tree-visualizer-diff t)
+ (setf undo-tree-auto-save-history nil) ;; no salva el historial de cambios
+
:config
- (progn
- (global-undo-tree-mode)
- (setq undo-tree-visualizer-timestamps nil)
- (setq undo-tree-visualizer-diff nil)
- (setq undo-tree-visualizer-quit t)
- (setq pop-up-frames t)))
+ (defalias 'redo 'undo-tree-redo)
+ (global-undo-tree-mode 1))
;;----------------------------------------------------------------------------
(load-file "~/.emacs.d/modules/lib/myemacs.el")