diff options
author | David Morgan <djm_uk@protonmail.com> | 2024-03-16 16:20:01 +0000 |
---|---|---|
committer | David Morgan <djm_uk@protonmail.com> | 2024-03-16 16:20:01 +0000 |
commit | dc0e9d88729040d685671215be872477f342d1fc (patch) | |
tree | 2417f3ba017e0ff3dfdeb64348cb8814c9011d2f | |
parent | a06de4b3f57bcc01a33768783994b3046d0c605e (diff) | |
download | dotfiles-dc0e9d88729040d685671215be872477f342d1fc.tar.gz |
Update elpaca installer code
-rw-r--r-- | .emacs.d/lisp/init-packages.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/.emacs.d/lisp/init-packages.el b/.emacs.d/lisp/init-packages.el index 38c6c77..bc297d4 100644 --- a/.emacs.d/lisp/init-packages.el +++ b/.emacs.d/lisp/init-packages.el @@ -3,12 +3,12 @@ ;;; Code: ;; Elpaca installer block -(defvar elpaca-installer-version 0.6) +(defvar elpaca-installer-version 0.7) (defvar elpaca-directory (expand-file-name "elpaca/" user-emacs-directory)) (defvar elpaca-builds-directory (expand-file-name "builds/" elpaca-directory)) (defvar elpaca-repos-directory (expand-file-name "repos/" elpaca-directory)) (defvar elpaca-order '(elpaca :repo "https://github.com/progfolio/elpaca.git" - :ref nil + :ref nil :depth 1 :files (:defaults "elpaca-test.el" (:exclude "extensions")) :build (:not elpaca--activate-package))) (let* ((repo (expand-file-name "elpaca/" elpaca-repos-directory)) @@ -21,8 +21,10 @@ (when (< emacs-major-version 28) (require 'subr-x)) (condition-case-unless-debug err (if-let ((buffer (pop-to-buffer-same-window "*elpaca-bootstrap*")) - ((zerop (call-process "git" nil buffer t "clone" - (plist-get order :repo) repo))) + ((zerop (apply #'call-process `("git" nil ,buffer t "clone" + ,@(when-let ((depth (plist-get order :depth))) + (list (format "--depth=%d" depth) "--no-single-branch")) + ,(plist-get order :repo) ,repo)))) ((zerop (call-process "git" nil buffer t "checkout" (or (plist-get order :ref) "--")))) (emacs (concat invocation-directory invocation-name)) |