acdw/emacs
acdw
/
emacs
1
2
Fork 0
Code Issues 4 Pull Requests Releases Activity

Don't be smart about bootstrapping straight.el

This commit is contained in:
Case Duckworth 2021-03-01 12:12:48 -06:00
parent 020b75199e
commit ce103be218
1 changed files with 15 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

41
early-init.el
View File

@ -213,32 +213,21 @@
(gitlab . "acdw"))
straight-base-dir acdw/var-dir)
;; Run `straight''s bootstrap code, after gitting the code directly.
(if (not (executable-find "git"))
(error "No 'git' in $PATH!")
(call-process "git" nil
(get-buffer-create "*bootstrap-straight-messages*")
nil
"clone"
"https://github.com/raxod502/straight.el"
(expand-file-name "repos/straight.el"
straight-base-dir))
(defvar bootstrap-version)
(let ((bootstrap-file
(expand-file-name
"repos/straight.el/bootstrap.el"
straight-base-dir))
(bootstrap-version 5))
(unless (file-exists-p bootstrap-file)
(with-current-buffer
(url-retrieve-synchronously
(concat
"https://raw.githubusercontent.com/"
"raxod502/straight.el/develop/install.el")
'silent 'inhibit-cookies)
(goto-char (point-max))
(eval-print-last-sexp)))
(load bootstrap-file nil 'nomessage)))
;; Run `straight''s bootstrap code
(defvar bootstrap-version)
(let ((bootstrap-file
(expand-file-name
"repos/straight.el/bootstrap.el"
straight-base-dir))
(bootstrap-version 5))
(unless (file-exists-p bootstrap-file)
(with-current-buffer
(url-retrieve-synchronously
"https://raw.githubusercontent.com/raxod502/straight.el/develop/install.el"
'silent 'inhibit-cookies)
(goto-char (point-max))
(eval-print-last-sexp)))
(load bootstrap-file nil 'nomessage))
;; `use-package'