;;; -*- lexical-binding: t -*- ;; ;; ----------------------------------------------------------------------------- (require 'cl-lib) (cl-pushnew (expand-file-name ".") load-path :test #'string=) (require 'luki-lisp) ;; ----------------------------------------------------------------------------- (-> 'compile) ;; ----------------------------------------------------------------------------- (setq compile-command "make -j -s") ;; ----------------------------------------------------------------------------- (defun compile-with-prompt () (i) "Use this if there are sudos in the Makefile." (compile compile-command 'comint)) ;; ----------------------------------------------------------------------------- (<- 'll-compile) ;; -----------------------------------------------------------------------------