File tree Expand file tree Collapse file tree 1 file changed +21
-0
lines changed Expand file tree Collapse file tree 1 file changed +21
-0
lines changed Original file line number Diff line number Diff line change 336
336
337
337
(defvar req-package-branches (make-hash-table :size 200 :test 'equal ))
338
338
339
+ (add-to-list 'use-package-keywords :el-get )
340
+
341
+ (defun use-package-normalize/:el-get (name-symbol keyword args )
342
+ (use-package-only-one (symbol-name keyword) args
343
+ (lambda (label arg )
344
+ (cond
345
+ ((booleanp arg) name-symbol)
346
+ ((symbolp arg) arg)
347
+ (t
348
+ (use-package-error
349
+ " :el-get wants an package name or boolean value" ))))))
350
+
351
+ (defun use-package-handler/:el-get (name-symbol keyword archive-name rest state )
352
+ (let ((body (use-package-process-keywords name-symbol rest state)))
353
+ ; ; This happens at macro expansion time, not when the expanded code is
354
+ ; ; compiled or evaluated.
355
+ (if (null archive-name)
356
+ body
357
+ (el-get-install archive-name)
358
+ body)))
359
+
339
360
(defun req-package-patch-config (pkg form )
340
361
" Wrap package PKG :config FORM into progn with callbacks."
341
362
(list 'progn
You can’t perform that action at this time.
0 commit comments