X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/8b734977727d8c96e3f716bcda3e0e20ccf70fa1..a727eabe76a6b724d347f500f76968ed89457f75:/packages/swiper/counsel.el?ds=sidebyside

diff --git a/packages/swiper/counsel.el b/packages/swiper/counsel.el
index ac04e6775..22dc505b3 100644
--- a/packages/swiper/counsel.el
+++ b/packages/swiper/counsel.el
@@ -727,7 +727,6 @@ CMD is a command name."
 (declare-function smex-detect-new-commands "ext:smex")
 (declare-function smex-update "ext:smex")
 (declare-function smex-rank "ext:smex")
-(declare-function package-installed-p "package")
 
 ;;;###autoload
 (defun counsel-M-x (&optional initial-input)
@@ -747,9 +746,7 @@ Optional INITIAL-INPUT is the initial input in the minibuffer."
          (cands obarray)
          (pred 'commandp)
          (sort t))
-    (when (or (featurep 'smex)
-              (package-installed-p 'smex))
-      (require 'smex)
+    (when (require 'smex nil 'noerror)
       (unless smex-initialized-p
         (smex-initialize))
       (smex-detect-new-commands)