diff --git a/contrib/eproject-compile.el b/contrib/eproject-compile.el index 9dceb81..f421665 100644 --- a/contrib/eproject-compile.el +++ b/contrib/eproject-compile.el @@ -51,10 +51,13 @@ (let ((potential-compiles (eproject-attribute :common-compiles)) (new-compile-history (list ()))) (if potential-compiles - (mapcar - '(lambda (c) - (format "cd %s && %s" (eproject-root) c)) - potential-compiles) + (delq 'nil (mapcar + '(lambda (c) + (cond + ((functionp c) (funcall c (eproject-root))) + ((stringp c) (format "cd %s && %s" (eproject-root) c)) + (t 'nil))) + potential-compiles)) (list (format "cd %s && make -k" (eproject-root))))))) ;;;###autoload