Modified setup to add nativecomp-deferred patch
This commit is contained in:
7
setup.el
7
setup.el
@@ -1,6 +1,9 @@
|
|||||||
;;; -*- lexical-binding: t; -*-
|
;;; -*- lexical-binding: t; -*-
|
||||||
(require 'json)
|
(require 'json)
|
||||||
|
|
||||||
|
(unless (boundp 'native-comp-deferred-compilation-deny-list)
|
||||||
|
(defvaralias 'native-comp-deferred-compilation-deny-list 'native-comp-jit-compilation-deny-list))
|
||||||
|
|
||||||
(defun nix-straight-get-used-packages (init-file output-file)
|
(defun nix-straight-get-used-packages (init-file output-file)
|
||||||
(let ((nix-straight--packages nil))
|
(let ((nix-straight--packages nil))
|
||||||
(advice-add 'straight-use-package
|
(advice-add 'straight-use-package
|
||||||
@@ -40,7 +43,9 @@
|
|||||||
(advice-add 'straight--native-compile-file-p
|
(advice-add 'straight--native-compile-file-p
|
||||||
:before (lambda (&rest r)
|
:before (lambda (&rest r)
|
||||||
(if (not (boundp 'comp-deferred-compilation-deny-list))
|
(if (not (boundp 'comp-deferred-compilation-deny-list))
|
||||||
(defvar comp-deferred-compilation-deny-list '())))))
|
(defvar comp-deferred-compilation-deny-list '()))
|
||||||
|
|
||||||
|
)))
|
||||||
|
|
||||||
(provide 'setup)
|
(provide 'setup)
|
||||||
;;; setup.el ends here
|
;;; setup.el ends here
|
||||||
|
Reference in New Issue
Block a user