Emacs 29.1 新特性 package-vc.el 让你快乐的管理非melpa的包

gangzhan · 2023 年8 月 22 日 06:27

Emacs30 里也已经添加了对应的 :vc 关键字

emacs-mirror/emacs/blob/48eb022debb85ec3b844e6833194bb05d35cb5c5/lisp/use-package/use-package-core.el#L1594-L1696


      
          ;;;; :vc
          
          
(defun use-package-vc-install (arg &optional local-path)
            "Install a package with `package-vc.el'.
          ARG is a list of the form (NAME OPTIONS REVISION), as returned by
          `use-package-normalize--vc-arg'.  If LOCAL-PATH is non-nil, call
          `package-vc-install-from-checkout'; otherwise, indicating a
          remote host, call `package-vc-install' instead."
            (pcase-let* ((`(,name ,opts ,rev) arg)
                         (spec (if opts (cons name opts) name)))
              (unless (package-installed-p name)
                (if local-path
                    (package-vc-install-from-checkout local-path (symbol-name name))
                  (package-vc-install spec rev)))))
          
          
(defun use-package-handler/:vc (name _keyword arg rest state)
            "Generate code to install package NAME, or do so directly.
          When the use-package declaration is part of a byte-compiled file,
          install the package during compilation; otherwise, add it to the
          macro expansion and wait until runtime.  The remaining arguments

This file has been truncated. show original

30 里内置的用法是

;; 拉取到最新的 release 版本，不加 `:rev :last-release` 跟这种效果一样
(use-package some-package
  :vc (:url "https://xxx" :rev :last-release))

;; 拉取最新的 commit 版本
(use-package some-package
  :vc (:url "https://xxx" :rev :newest))