awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-11 13:07:28 -05:00
Code Issues Packages Projects Releases Wiki Activity

Clean up + refactor

Browse Source
This commit is contained in:
Henrik Lissner
2016-03-03 15:04:14 -05:00
parent 7e282841ba
commit 9571acd3e9
18 changed files with 136 additions and 102 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
modules/module-apple.el
View File

@ -13,10 +13,10 @@
(require 'company-sourcekit)
(define-company-backend! swift-mode (sourcekit yasnippet))))
(defun narf-lb6-reload ()
(interactive)
(let ((dir (f-traverse-upwards (lambda (f) (string-suffix-p ".lbaction" f)))))
(shell-command (format "open '%s'" dir))))
;;
;; LaunchBar: https://www.obdev.at/products/launchbar
;;
(define-minor-mode lb6-mode
"Launchbar development mode."
@ -26,5 +26,10 @@
(define-builder! lb6-mode narf-lb6-reload)
(associate! lb6-mode :match "\\.lb\\(action\\|ext\\)/.+$")
(defun narf-lb6-reload ()
(interactive)
(let ((dir (f-traverse-upwards (lambda (f) (string-suffix-p ".lbaction" f)))))
(shell-command (format "open '%s'" dir))))
(provide 'module-apple)
;;; module-apple.el ends here