From c373aa8fef09aff3e04b983ac5863909e059b7a0 Mon Sep 17 00:00:00 2001 From: Wojciech Kozlowski Date: Fri, 10 Apr 2020 13:03:31 +0200 Subject: [PATCH] Replace deprecated cl with cl-lib --- emodule/emodule.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/emodule/emodule.el b/emodule/emodule.el index 04f4eee..3d2b799 100644 --- a/emodule/emodule.el +++ b/emodule/emodule.el @@ -22,8 +22,7 @@ ;;; Code: (require 'package) -(with-no-warnings - (require 'cl)) +(require 'cl-lib) (defgroup emodule nil "Further automate working with `package'" @@ -214,7 +213,7 @@ DESIRED-PKGS unless NO-SET-SELECTED is non-nil" (install-pkgs nil)) (while (and (< attempt emodule/install-attempts) (setq install-pkgs - (remove-if #'package-installed-p desired-pkgs))) + (cl-remove-if #'package-installed-p desired-pkgs))) (if (= attempt 0) (progn (emodule/print-log "*** Install packages ***") @@ -226,7 +225,7 @@ DESIRED-PKGS unless NO-SET-SELECTED is non-nil" (setq attempt (1+ attempt)))) ;; Print an error message if not all packages were installed. - (let ((failed-pkgs (remove-if #'package-installed-p desired-pkgs))) + (let ((failed-pkgs (cl-remove-if #'package-installed-p desired-pkgs))) (when failed-pkgs (emodule/print-error-log "*** WARNING: NOT ALL PACKAGES WERE INSTALLED ***")