From fbe05e3e087a879059b3a14a3d340cb60fec06d8 Mon Sep 17 00:00:00 2001
From: Lin Sun <sunlin7@hotmail.com>
Date: Mon, 20 Jun 2022 00:00:17 +0000
Subject: [PATCH] [core] fix error msg from byte-compiling
 core-configuration-layer.el

---
 core/core-configuration-layer.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/core/core-configuration-layer.el b/core/core-configuration-layer.el
index d3abd236c..b8f4101ca 100644
--- a/core/core-configuration-layer.el
+++ b/core/core-configuration-layer.el
@@ -661,7 +661,7 @@ To prevent package from being installed or uninstalled set the variable
                        (list layer))
                       (dolist (pkg pkgs)
                         (let ((pkg-name (if (listp pkg) (car pkg) pkg)))
-                          (add-to-list 'all-other-packages pkg-name))))))
+                          (cl-pushnew pkg-name all-other-packages))))))
                 (configuration-layer//filter-distant-packages
                  all-other-packages nil))))))
       (configuration-layer//install-packages packages)
@@ -1887,7 +1887,7 @@ RNAME is the name symbol of another existing layer."
             (when install-deps
               (setq result (append install-deps result))))
           (when (funcall filter pkg-name)
-            (add-to-list 'result pkg-name t))))
+            (cl-pushnew pkg-name result))))
       (delete-dups result))))
 
 (defun configuration-layer//filter-packages-with-deps
@@ -2327,7 +2327,7 @@ depends on it."
           (let* ((dep-sym (car dep))
                  (value (spacemacs-ht-get result dep-sym)))
             (puthash dep-sym
-                     (if value (add-to-list 'value pkg-sym) (list pkg-sym))
+                     (if value (cl-pushnew pkg-sym value) (list pkg-sym))
                      result)))))
     result))
 
@@ -2337,7 +2337,7 @@ depends on it."
     (dolist (pkg package-alist)
       (let ((pkg-sym (car pkg)))
         (unless (memq pkg-sym packages)
-          (add-to-list 'imp-pkgs pkg-sym))))
+          (cl-pushnew pkg-sym imp-pkgs))))
     imp-pkgs))
 
 (defun configuration-layer//get-orphan-packages
@@ -2347,7 +2347,7 @@ depends on it."
     (dolist (imp-pkg implicit-pkgs)
       (when (configuration-layer//is-package-orphan
              imp-pkg dist-pkgs dependencies)
-        (add-to-list 'result imp-pkg)))
+        (cl-pushnew imp-pkg result)))
     result))
 
 (defun configuration-layer//is-package-orphan (pkg-name dist-pkgs dependencies)
@@ -2555,7 +2555,7 @@ depends on it."
                                   (assq x package-archive-contents)))))
           (dolist (pkg (cons pkg-sym elpa-deps))
             ;; avoid duplicates
-            (add-to-list 'result pkg)))))
+            (cl-pushnew pkg result)))))
     result))
 
 (defun configuration-layer//create-archive-contents-item (pkg-name)