hiro/boon
1
0
Fork 0
mirror of https://github.com/vale981/boon synced 2025-03-05 09:31:43 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

warnings

Browse source
This commit is contained in:
Jean-Philippe Bernardy 2014-10-20 10:28:56 +02:00
parent 40719bf8d8
commit 0cac6d7046
1 changed files with 3 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
boon-core.el
View file

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