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

mod-love: better love2D support

Browse source
This commit is contained in:
Henrik Lissner 2014-08-07 23:35:29 -04:00
parent 3714e41b47
commit d73cf14cfb
1 changed files with 9 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

5
init/mod-love.el
View file

@ -14,18 +14,17 @@
:group lua) :group lua)
(define-key love-mode-map (kbd "s-b") (define-key love-mode-map (kbd "s-b")
(lambda() (shell-command (concat "love " default-directory)))) (lambda() (interactive) (shell-command (concat "open -a love.app " default-directory))))
(add-hook 'lua-mode-hook (add-hook 'lua-mode-hook
(lambda() (lambda()
(if (string-match "\\.love/.+\\.lua" default-directory) (if (string-match "\\.love/.+\\.lua\\'" (buffer-file-name))
(love-mode t)) (love-mode t))
(nmap lua-mode-map (kbd "s-r") (nmap lua-mode-map (kbd "s-r")
(lambda() (interactive) (shell-command-on-region (point-min) (point-max) "lua"))) (lambda() (interactive) (shell-command-on-region (point-min) (point-max) "lua")))
(vmap lua-mode-map (kbd "s-r") (vmap lua-mode-map (kbd "s-r")
(lambda() (interactive) (shell-command-on-region (region-beginning) (region-end) "lua"))) (lambda() (interactive) (shell-command-on-region (region-beginning) (region-end) "lua")))
)))) ))))
;; ;;