doomemacs/modules/tools/make/autoload.el

26 lines
928 B
EmacsLisp
Raw Normal View History

2017-09-25 19:06:08 +08:00
;;; tools/make/autoload.el -*- lexical-binding: t; -*-
(require 'makefile-executor)
2017-09-25 19:06:08 +08:00
;;;###autoload
(defun +make/run ()
"Run a make task in the current project. If multiple makefiles are available,
you'll be prompted to select one."
(interactive)
(if (doom-project-p 'nocache)
(makefile-executor-execute-project-target)
(let ((makefile (cl-loop with buffer-file = (or buffer-file-name default-directory)
for file in (list "Makefile" "makefile")
if (locate-dominating-file buffer-file file)
return file)))
(unless makefile
(user-error "Cannot find a makefile in the current project"))
(let ((default-directory (file-name-directory makefile)))
(makefile-executor-execute-target makefile)))))
;;;###autoload
(defun +make/run-last ()
"TODO"
2017-09-25 19:06:08 +08:00
(interactive)
(makefile-executor-execute-last nil))