feature/package+vc f9065c7951 5/9: Use 'package-vc-p' in package-vc.el

[Philip Kaludercic]

branch: feature/package+vc
commit f9065c7951bd31b3475e2c425cd2b6c08e51b7e1
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    Use 'package-vc-p' in package-vc.el
    
    * package-vc.el (package-vc-commit): Use it instead of 'eq'.
    (package-vc-version): Use it instead of 'eq'.
---
 lisp/emacs-lisp/package-vc.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el
index d3850a5e2c..e03a5f73b4 100644
--- a/lisp/emacs-lisp/package-vc.el
+++ b/lisp/emacs-lisp/package-vc.el
@@ -71,7 +71,7 @@
 
 (defun package-vc-commit (pkg)
   "Extract the commit of a development package PKG."
-  (cl-assert (eq (package-desc-kind pkg) 'vc))
+  (cl-assert (package-vc-p pkg))
   ;; FIXME: vc should be extended to allow querying the commit of a
   ;; directory (as is possible when dealing with git repositores).
   ;; This should be a fallback option.
@@ -82,7 +82,7 @@
 
 (defun package-vc-version (pkg)
   "Extract the commit of a development package PKG."
-  (cl-assert (eq (package-desc-kind pkg) 'vc))
+  (cl-assert (package-vc-p pkg))
   (cl-loop with dir = (package-desc-dir pkg) ;FIXME: dir is nil
            for file in (sort (directory-files dir t "\\.el\\'")
                              (lambda (s1 s2)