emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

lb6-mode: make M-b and :build reinstall the action

Browse source
This commit is contained in:
Henrik Lissner 2016-02-18 05:05:52 -05:00
parent a54d6221d0
commit bafc3e2961
1 changed files with 2 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

8
modules/module-apple.el
View file

@ -16,18 +16,14 @@
(defun narf-lb6-reload () (defun narf-lb6-reload ()
(interactive) (interactive)
(let ((dir (f-traverse-upwards (lambda (f) (string-suffix-p ".lbaction" f))))) (let ((dir (f-traverse-upwards (lambda (f) (string-suffix-p ".lbaction" f)))))
(shell-command (format "open %s" dir)))) (shell-command (format "open '%s'" dir))))
(define-minor-mode lb6-mode (define-minor-mode lb6-mode
"Launchbar development mode." "Launchbar development mode."
:init-value nil :init-value nil
:lighter " lb6" :lighter " lb6"
:keymap (let ((map (make-sparse-keymap)))
(map! :map map
(:localleader
:n "b" 'narf-lb6-reload))
map)
(add-yas-minor-mode! 'lb6-mode)) (add-yas-minor-mode! 'lb6-mode))
(define-builder! lb6-mode narf-lb6-reload)
(associate! lb6-mode :match "\\.lb\\(action\\|ext\\)/.+$") (associate! lb6-mode :match "\\.lb\\(action\\|ext\\)/.+$")
(provide 'module-apple) (provide 'module-apple)