Skip to content
Browse files

achieve dominance over paredit

  • Loading branch information...
1 parent 0111788 commit feb0e597212577b8634e765b793ed00d6b31174b Le Wang committed
Showing with 11 additions and 0 deletions.
  1. +11 −0 rebox2.el
View
11 rebox2.el
@@ -2816,6 +2816,17 @@ count trailing spaces or t to always count.
(rebox-register-all-templates)
+(defun rebox-promote-map ()
+ (let ((rebox-mode-binding (assq 'rebox-mode minor-mode-map-alist)))
+ (setq minor-mode-map-alist (delete rebox-mode-binding minor-mode-map-alist))
+ (push rebox-mode-binding minor-mode-map-alist)))
+
+;;; we need priority over paredit, which dumbly maps "DEL"
+(eval-after-load "paredit"
+ '(rebox-promote-map))
+
+
+
(provide 'rebox2)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

0 comments on commit feb0e59

Please sign in to comment.
Something went wrong with that request. Please try again.