scratch/package-vc-fixes 2024a01fdc 30/48: Mention package name when package is lacking VC data

[Philip Kaludercic]

branch: scratch/package-vc-fixes
commit 2024a01fdc52684d2214e532e2dd4c3f56bfed1d
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    Mention package name when package is lacking VC data
    
    * lisp/emacs-lisp/package-vc.el (package-vc-install): Add package name.
    (package-vc-checkout): Add package name.
---
 lisp/emacs-lisp/package-vc.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el
index b876fe7a1a..cbcd9fd55d 100644
--- a/lisp/emacs-lisp/package-vc.el
+++ b/lisp/emacs-lisp/package-vc.el
@@ -659,7 +659,7 @@ uses `package-vc-heuristic-alist' to guess the backend."
                       (url (alist-get :url extras))
                       (backend (package-vc--guess-backend url)))
              (list :vc-backend backend :url url))
-           (user-error "Package has no VC data"))
+           (user-error "Package `%s' has no VC data" name-or-url))
        rev)))
    ((user-error "Unknown package to fetch: %s" name-or-url))))
 
@@ -687,7 +687,8 @@ for the last released version of the package."
                                  (url (alist-get :url extras))
                                  (backend (package-vc--guess-backend url)))
                         (list :vc-backend backend :url url))
-                      (user-error "Package has no VC data"))))
+                      (user-error "Package `%s' has no VC data"
+                                  (package-desc-name pkg-desc)))))
     (package-vc--clone pkg-desc pkg-spec directory rev)
     (find-file directory)))