2017-06-08 11:47:56 +02:00
|
|
|
;;; lang/lua/autoload.el -*- lexical-binding: t; -*-
|
2017-02-19 18:57:16 -05:00
|
|
|
|
|
|
|
;;;###autoload
|
|
|
|
(defun +lua/repl ()
|
2017-06-08 11:47:56 +02:00
|
|
|
"Open Lua REPL."
|
2017-02-19 18:57:16 -05:00
|
|
|
(interactive)
|
|
|
|
(lua-start-process "lua" "lua")
|
|
|
|
(pop-to-buffer lua-process-buffer))
|
|
|
|
|
2017-10-03 02:49:08 +02:00
|
|
|
;;;###autoload
|
|
|
|
(defun +lua/run-love-game ()
|
|
|
|
"Run the current project with Love2D."
|
|
|
|
(interactive)
|
2018-03-18 22:18:34 -04:00
|
|
|
(when-let* ((root (locate-dominating-file buffer-file-name "main.lua")))
|
|
|
|
(async-shell-command
|
|
|
|
(format "%s %s"
|
|
|
|
(or (executable-find "love")
|
|
|
|
(if IS-MAC "open -a love.app"))
|
|
|
|
(shell-quote-argument (file-name-directory root))))))
|
2017-10-03 02:49:08 +02:00
|
|
|
|