diff options
author | Philip Kaludercic <philipk@posteo.net> | 2023-03-15 09:54:12 +0100 |
---|---|---|
committer | Philip Kaludercic <philipk@posteo.net> | 2023-03-15 10:28:14 +0100 |
commit | 27edd7f88cb3506b2ca8bd6c26c6a83b6a291e81 (patch) | |
tree | 5b9ceb752416c844c70fcbf8f15317309da10b06 /lisp/emacs-lisp | |
parent | 39fea1155150b48344cd9971c6248bc7b7a369f9 (diff) | |
download | emacs-27edd7f88cb3506b2ca8bd6c26c6a83b6a291e81.tar.gz |
Remove 'package-vc--query-spec'
* lisp/emacs-lisp/package-vc.el (require): Do not load `inline' during
compilation.
(package-vc--query-spec): Remove function.
(package-vc--clone): Do not call 'package-vc--query-spec'.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/package-vc.el | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el index 09f8b4462e2..253b35f1f1a 100644 --- a/lisp/emacs-lisp/package-vc.el +++ b/lisp/emacs-lisp/package-vc.el @@ -48,7 +48,6 @@ ;;; Code: (eval-when-compile (require 'rx)) -(eval-when-compile (require 'inline)) (eval-when-compile (require 'map)) (eval-when-compile (require 'cl-lib)) (require 'package) @@ -227,13 +226,6 @@ name for PKG-DESC." (mapcar #'cdr package-vc--archive-spec-alist)))) '() nil #'string=)) -(define-inline package-vc--query-spec (pkg-desc prop) - "Query the property PROP for the package specification of PKG-DESC. -If no package specification can be determined, the function will -return nil." - (inline-letevals (pkg-desc prop) - (inline-quote (plist-get (package-vc--desc->spec ,pkg-desc) ,prop)))) - (defun package-vc--read-archive-data (archive) "Update `package-vc--archive-spec-alist' for ARCHIVE. This function is meant to be used as a hook for `package-read-archive-hook'." @@ -578,7 +570,6 @@ attribute in PKG-SPEC." (unless (file-exists-p dir) (make-directory (file-name-directory dir) t) (let ((backend (or (plist-get pkg-spec :vc-backend) - (package-vc--query-spec pkg-desc :vc-backend) (package-vc--guess-backend url) (plist-get (alist-get (package-desc-archive pkg-desc) package-vc--archive-data-alist |