mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 09:14:18 +00:00
; Remove unnecessary 'inline' require from package.el
* lisp/emacs-lisp/package-activate.el (package-vc-p): Define using a regular 'defun'.
This commit is contained in:
parent
d734b240fb
commit
49c8dd44af
2 changed files with 2 additions and 4 deletions
|
|
@ -63,10 +63,9 @@ If VERSION is nil, the package is not made available (it is \"disabled\")."
|
|||
|
||||
(defvar package--default-summary "No description available.")
|
||||
|
||||
(define-inline package-vc-p (pkg-desc)
|
||||
(defun package-vc-p (pkg-desc)
|
||||
"Return non-nil if PKG-DESC is a VC package."
|
||||
(inline-letevals (pkg-desc)
|
||||
(inline-quote (eq (package-desc-kind ,pkg-desc) 'vc))))
|
||||
(eq (package-desc-kind pkg-desc) 'vc))
|
||||
|
||||
(cl-defstruct (package-desc
|
||||
;; Rename the default constructor from `make-package-desc'.
|
||||
|
|
|
|||
|
|
@ -148,7 +148,6 @@
|
|||
(require 'cl-lib)
|
||||
(eval-when-compile (require 'subr-x))
|
||||
(eval-when-compile (require 'epg)) ;For setf accessors.
|
||||
(eval-when-compile (require 'inline)) ;For `define-inline'
|
||||
(require 'seq)
|
||||
|
||||
(require 'tabulated-list)
|
||||
|
|
|
|||
Loading…
Reference in a new issue