@@ -661,7 +661,7 @@ To prevent package from being installed or uninstalled set the variable
661661 (list layer))
662662 (dolist (pkg pkgs)
663663 (let ((pkg-name (if (listp pkg) (car pkg) pkg)))
664- (add-to-list ' all-other-packages pkg-name ))))))
664+ (cl-pushnew pkg-name all-other-packages))))))
665665 (configuration-layer//filter-distant-packages
666666 all-other-packages nil ))))))
667667 (configuration-layer//install-packages packages)
@@ -1887,7 +1887,7 @@ RNAME is the name symbol of another existing layer."
18871887 (when install-deps
18881888 (setq result (append install-deps result))))
18891889 (when (funcall filter pkg-name)
1890- (add-to-list 'result pkg-name t ))))
1890+ (cl-pushnew pkg-name result ))))
18911891 (delete-dups result))))
18921892
18931893(defun configuration-layer//filter-packages-with-deps
@@ -2327,7 +2327,7 @@ depends on it."
23272327 (let* ((dep-sym (car dep))
23282328 (value (spacemacs-ht-get result dep-sym)))
23292329 (puthash dep-sym
2330- (if value (add-to-list 'value pkg-sym) (list pkg-sym))
2330+ (if value (cl-pushnew pkg-sym value ) (list pkg-sym))
23312331 result)))))
23322332 result))
23332333
@@ -2337,7 +2337,7 @@ depends on it."
23372337 (dolist (pkg package-alist)
23382338 (let ((pkg-sym (car pkg)))
23392339 (unless (memq pkg-sym packages)
2340- (add-to-list ' imp-pkgs pkg-sym ))))
2340+ (cl-pushnew pkg-sym imp-pkgs))))
23412341 imp-pkgs))
23422342
23432343(defun configuration-layer//get-orphan-packages
@@ -2347,7 +2347,7 @@ depends on it."
23472347 (dolist (imp-pkg implicit-pkgs)
23482348 (when (configuration-layer//is-package-orphan
23492349 imp-pkg dist-pkgs dependencies)
2350- (add-to-list 'result imp-pkg)))
2350+ (cl-pushnew imp-pkg result )))
23512351 result))
23522352
23532353(defun configuration-layer//is-package-orphan (pkg-name dist-pkgs dependencies )
@@ -2555,7 +2555,7 @@ depends on it."
25552555 (assq x package-archive-contents)))))
25562556 (dolist (pkg (cons pkg-sym elpa-deps))
25572557 ; ; avoid duplicates
2558- (add-to-list 'result pkg)))))
2558+ (cl-pushnew pkg result )))))
25592559 result))
25602560
25612561(defun configuration-layer//create-archive-contents-item (pkg-name )
0 commit comments