doom purge: make repo regrafting opt-out

Was originally opt-in.
This commit is contained in:
Henrik Lissner 2021-01-31 04:29:54 -05:00
parent 07f134b10e
commit 05aa13ea19

View file

@ -21,11 +21,11 @@ Emacs (as byte-code is generally not forward-compatible)."
t) t)
(defcli! (purge p) (defcli! (purge p)
((nobuilds-p ["-b" "--no-builds"] "Don't purge unneeded (built) packages") ((nobuilds-p ["-b" "--no-builds"] "Don't purge unneeded (built) packages")
(noelpa-p ["-p" "--no-elpa"] "Don't purge ELPA packages") (noelpa-p ["-p" "--no-elpa"] "Don't purge ELPA packages")
(norepos-p ["-r" "--no-repos"] "Don't purge unused straight repos") (norepos-p ["-r" "--no-repos"] "Don't purge unused straight repos")
(noeln-p ["-e" "--no-eln"] "Don't purge old ELN bytecode") (noeln-p ["-e" "--no-eln"] "Don't purge old ELN bytecode")
(regraft-p ["-g" "--regraft"] "Regraft git repos (ie. compact them)")) (noregraft-p ["-g" "--no-regraft"] "Regraft git repos (ie. compact them)"))
"Deletes orphaned packages & repos, and compacts them. "Deletes orphaned packages & repos, and compacts them.
Purges all installed ELPA packages (as they are considered temporary). Purges Purges all installed ELPA packages (as they are considered temporary). Purges
@ -40,7 +40,7 @@ list remains lean."
(not noelpa-p) (not noelpa-p)
(not norepos-p) (not norepos-p)
(not nobuilds-p) (not nobuilds-p)
regraft-p (not noregraft-p)
(not noeln-p)) (not noeln-p))
(doom-autoloads-reload)) (doom-autoloads-reload))
t) t)