From 0cac6d7046ff10e12638cdee9ebbca484be2d9d4 Mon Sep 17 00:00:00 2001 From: Jean-Philippe Bernardy Date: Mon, 20 Oct 2014 10:28:56 +0200 Subject: [PATCH] warnings --- boon-core.el | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/boon-core.el b/boon-core.el index 90c3598..56a610c 100644 --- a/boon-core.el +++ b/boon-core.el @@ -139,6 +139,7 @@ (and (boundp sym) (eq (eval sym) val))) (defun boon-minibuf-hook () + "Detect if the minibuffer is a helm minibuffer, and activate boon helm command mode if so." (cond ((eq-if-bound 'helm-map (current-local-map)) (boon-helm-set-command-state)) @@ -147,11 +148,8 @@ (t (setq cursor-type 'bar)))) (defun boon-initialize () - "Enable Boon in the current buffer, if appropriate. To enable Boon globally, do (boon-mode 1)." - (unless (or (minibufferp) - ;; (eq major-mode 'inferior-haskell-mode) - ;; (eq major-mode 'compilation-mode) - ) + "Enable Boon in the current buffer, if appropriate. To enable Boon globally, do (boon-mode 1)." + (unless (minibufferp) (boon-local-mode 1))) (define-globalized-minor-mode boon-mode