Add {--no-{elpa,builds},-r,--repos} flags to 'doom purge'
This commit is contained in:
parent
8a16513107
commit
ba07fe575e
1 changed files with 13 additions and 3 deletions
|
@ -30,11 +30,21 @@ their elisp files are byte-compiled."
|
||||||
(doom-packages-rebuild doom-auto-accept (member "-f" args))))
|
(doom-packages-rebuild doom-auto-accept (member "-f" args))))
|
||||||
|
|
||||||
(defcli! (purge p) (&rest args)
|
(defcli! (purge p) (&rest args)
|
||||||
"Deletes any unused packages and repos."
|
"Deletes any unused ELPA packages, straight builds, and (optionally) repos.
|
||||||
|
|
||||||
|
By default, this does not purge repos.
|
||||||
|
|
||||||
|
Available options:
|
||||||
|
|
||||||
|
--no-elpa Don't purge ELPA packages
|
||||||
|
--no-builds Don't purge unneeded (built) packages
|
||||||
|
--repos Purge unused repos"
|
||||||
(doom--ensure-autoloads-while
|
(doom--ensure-autoloads-while
|
||||||
(straight-check-all)
|
(straight-check-all)
|
||||||
(doom-packages-purge 'elpa-p 'build-p
|
(doom-packages-purge (not (member "--no-elpa" args))
|
||||||
(member "-f" args)
|
(not (member "--no-builds" args))
|
||||||
|
(or (member "-r" args)
|
||||||
|
(member "--repos" args))
|
||||||
doom-auto-accept)))
|
doom-auto-accept)))
|
||||||
|
|
||||||
;; (defcli! rollback () ; TODO rollback
|
;; (defcli! rollback () ; TODO rollback
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue