Unbind conflicting prelude-mode keys.

This commit is contained in:
Gabriel J. Pérez Irizarry 2013-09-25 17:04:07 -04:00
parent 0e1632868e
commit a63f62b8c0

View file

@ -38,12 +38,19 @@
(global-set-key "\C-cb" 'org-iswitchb)
(setq org-log-done t)
;; (defun prelude-org-mode-defaults ()
;; )
(defun prelude-org-mode-defaults ()
(let ((oldmap (cdr (assoc 'prelude-mode minor-mode-map-alist)))
(newmap (make-sparse-keymap)))
(set-keymap-parent newmap oldmap)
(define-key newmap (kbd "C-c +") nil)
(define-key newmap (kbd "C-c -") nil)
(make-local-variable 'minor-mode-overriding-map-alist)
(push `(prelude-mode . ,newmap) minor-mode-overriding-map-alist))
)
;; (setq prelude-org-mode-hook 'prelude-org-mode-defaults)
(setq prelude-org-mode-hook 'prelude-org-mode-defaults)
;; (add-hook 'org-mode-hook (lambda () (run-hooks 'prelude-org-mode-hook)))
(add-hook 'org-mode-hook (lambda () (run-hooks 'prelude-org-mode-hook)))
(provide 'prelude-org)