Extend byte-compile ;;;###if support to other elisp files

This commit is contained in:
Henrik Lissner 2017-12-10 16:57:51 -05:00
parent 3bc847ac6b
commit b14198dedf
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
5 changed files with 7 additions and 4 deletions

View file

@ -649,10 +649,9 @@ If RECOMPILE-P is non-nil, only recompile out-of-date files."
(let ((elc-file (byte-compile-dest-file target))) (let ((elc-file (byte-compile-dest-file target)))
(and (file-exists-p elc-file) (and (file-exists-p elc-file)
(file-newer-than-file-p file elc-file)))) (file-newer-than-file-p file elc-file))))
(let ((result (if (and (string-match-p "/autoload/.*\\.el$" target) (let ((result (if (doom-packages--read-if-cookies target)
(not (doom-packages--read-if-cookies target))) (byte-compile-file target)
'no-byte-compile 'no-byte-compile))
(byte-compile-file target)))
(short-name (file-relative-name target doom-emacs-dir))) (short-name (file-relative-name target doom-emacs-dir)))
(cl-incf (cl-incf
(cond ((eq result 'no-byte-compile) (cond ((eq result 'no-byte-compile)

View file

@ -1,4 +1,5 @@
;;; lang/haskell/+dante.el -*- lexical-binding: t; -*- ;;; lang/haskell/+dante.el -*- lexical-binding: t; -*-
;;;###if (featurep! +dante)
(def-package! dante (def-package! dante
:after haskell-mode :after haskell-mode

View file

@ -1,4 +1,5 @@
;;; lang/haskell/+intero.el -*- lexical-binding: t; -*- ;;; lang/haskell/+intero.el -*- lexical-binding: t; -*-
;;;###if (featurep! +intero)
(def-package! intero (def-package! intero
:hook (haskell-mode . intero-mode) :hook (haskell-mode . intero-mode)

View file

@ -1,4 +1,5 @@
;;; lang/java/+eclim.el -*- lexical-binding: t; -*- ;;; lang/java/+eclim.el -*- lexical-binding: t; -*-
;;;###if (featurep! +eclim)
;; NOTE This submodule is incomplete ;; NOTE This submodule is incomplete

View file

@ -1,4 +1,5 @@
;;; lang/java/+meghanada.el -*- lexical-binding: t; -*- ;;; lang/java/+meghanada.el -*- lexical-binding: t; -*-
;;;###if (featurep! +meghanada)
(def-package! meghanada (def-package! meghanada
:hook (java-mode . meghanada-mode) :hook (java-mode . meghanada-mode)