chore(early-init): set native compile pattern in early-init.el

jimeh · Nov 21, 2024 · e0c300c · e0c300c
1 parent 0bb354b
commit e0c300c
Showing 1 changed file with 7 additions and 3 deletions.
diff --git a/early-init.el b/early-init.el
@@ -16,9 +16,13 @@
 
 ;; Prevent native-compiling .dir-locals.el files.
 (let ((deny-list '("\\(?:[/\\\\]\\.dir-locals\\.el$\\)")))
-  (if (boundp 'native-comp-deferred-compilation-deny-list)
-      (setq native-comp-deferred-compilation-deny-list deny-list)
-    (setq comp-deferred-compilation-deny-list deny-list)))
+  (cond
+   ((boundp 'native-comp-jit-compilation-deny-list)
+    (setq native-comp-jit-compilation-deny-list deny-list))
+   ((boundp 'native-comp-deferred-compilation-deny-list)
+    (setq native-comp-deferred-compilation-deny-list deny-list))
+   ((boundp 'comp-deferred-compilation-deny-list)
+    (setq comp-deferred-compilation-deny-list deny-list))))
 
 (when (or (boundp 'comp-eln-load-path) (boundp 'native-comp-eln-load-path))
   (let ((eln-cache-dir (expand-file-name "cache/eln-cache/"