diff options
| author | Case Duckworth | 2021-04-22 11:50:19 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-04-22 11:50:19 -0500 |
| commit | 4ff45377948e5d479077b808a6fa76206b5bb303 (patch) | |
| tree | caa265a4fb6402b54a7e3c6cd496ece1949c1c9c | |
| parent | Install w32-browser at work (diff) | |
| download | emacs-4ff45377948e5d479077b808a6fa76206b5bb303.tar.gz emacs-4ff45377948e5d479077b808a6fa76206b5bb303.zip | |
Bail out of `setup' if straight fails
| -rw-r--r-- | init.el | 5 |
1 files changed, 4 insertions, 1 deletions
| diff --git a/init.el b/init.el index 54a5f66..06ccbfb 100644 --- a/init.el +++ b/init.el | |||
| @@ -27,7 +27,10 @@ | |||
| 27 | 27 | ||
| 28 | (setup-define :straight | 28 | (setup-define :straight |
| 29 | (lambda (recipe) | 29 | (lambda (recipe) |
| 30 | `(straight-use-package ',recipe)) | 30 | `(or (ignore-errors (straight-use-package ',recipe)) |
| 31 | (progn | ||
| 32 | (message "Straight error: %S" ',recipe) | ||
| 33 | (throw 'setup-exit nil)))) | ||
| 31 | :documentation "Install RECIPE with `straight-use-package'." | 34 | :documentation "Install RECIPE with `straight-use-package'." |
| 32 | :repeatable t | 35 | :repeatable t |
| 33 | :shorthand (lambda (sexp) | 36 | :shorthand (lambda (sexp) |