diff options
| author | Case Duckworth | 2021-10-05 20:20:42 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-10-05 20:20:42 -0500 |
| commit | 352f18559ca2f583ecbf161fb3f938952d7e26c4 (patch) | |
| tree | 87396b090282d15405699c70e6a0f7613f236b83 /lisp/acdw-setup.el | |
| parent | Correct bug (diff) | |
| parent | Replace ytel with ytdious (diff) | |
| download | emacs-352f18559ca2f583ecbf161fb3f938952d7e26c4.tar.gz emacs-352f18559ca2f583ecbf161fb3f938952d7e26c4.zip | |
Merge branch 'main' of github.com:duckwork/.emacs.d
Diffstat (limited to 'lisp/acdw-setup.el')
| -rw-r--r-- | lisp/acdw-setup.el | 3 |
1 files changed, 2 insertions, 1 deletions
| diff --git a/lisp/acdw-setup.el b/lisp/acdw-setup.el index eb4d12b..33ab835 100644 --- a/lisp/acdw-setup.el +++ b/lisp/acdw-setup.el | |||
| @@ -72,7 +72,7 @@ first RECIPE's package." | |||
| 72 | (car recipe) | 72 | (car recipe) |
| 73 | recipe)))) | 73 | recipe)))) |
| 74 | 74 | ||
| 75 | (setup-define :straight-if | 75 | (setup-define :straight-when |
| 76 | (lambda (recipe condition) | 76 | (lambda (recipe condition) |
| 77 | `(if ,condition | 77 | `(if ,condition |
| 78 | (straight-use-package ',recipe) | 78 | (straight-use-package ',recipe) |
| @@ -83,6 +83,7 @@ If CONDITION is false, stop evaluating the body. This macro can | |||
| 83 | be used as HEAD, and will replace itself with the RECIPE's | 83 | be used as HEAD, and will replace itself with the RECIPE's |
| 84 | package. This macro is not repeatable." | 84 | package. This macro is not repeatable." |
| 85 | :repeatable nil | 85 | :repeatable nil |
| 86 | :indent 1 | ||
| 86 | :shorthand (lambda (sexp) | 87 | :shorthand (lambda (sexp) |
| 87 | (let ((recipe (cadr sexp))) | 88 | (let ((recipe (cadr sexp))) |
| 88 | (if (consp recipe) (car recipe) recipe)))) | 89 | (if (consp recipe) (car recipe) recipe)))) |