aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2021-04-23 16:09:31 -0700
committerSean Whitton <spwhitton@spwhitton.name>2021-04-24 17:23:59 -0700
commitc69f3cbd438df4814e9d50fb17ec273c91edc060 (patch)
treeab1e53b0639862d60186b015682f0c402e6b748e /src
parentf5ca2ea1f9436ca12dabaecaeed8fe3db69c0c58 (diff)
downloadconsfigurator-c69f3cbd438df4814e9d50fb17ec273c91edc060.tar.gz
add APT:CACHE-CLEANED
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src')
-rw-r--r--src/package.lisp1
-rw-r--r--src/property/apt.lisp6
2 files changed, 7 insertions, 0 deletions
diff --git a/src/package.lisp b/src/package.lisp
index 494304c..7c72655 100644
--- a/src/package.lisp
+++ b/src/package.lisp
@@ -309,6 +309,7 @@
#:uses-parent-proxy
#:uses-local-cacher
#:standard-sources.list
+ #:cache-cleaned
#:all-installed-p
#:none-installed-p))
diff --git a/src/property/apt.lisp b/src/property/apt.lisp
index 2ba27bd..12fae2e 100644
--- a/src/property/apt.lisp
+++ b/src/property/apt.lisp
@@ -192,6 +192,12 @@ only upgrade Debian stable."
(mapcan (lambda (l) (list #?"deb @{l}" #?"deb-src @{l}"))
(nconc archive security))))
+(defprop cache-cleaned :posix ()
+ "Empty apt's cache to recover disk space."
+ (:desc "apt cache cleaned")
+ (:hostattrs (os:required 'os:debianlike))
+ (:apply (apt-get "clean") :no-change))
+
;;;; Reports on installation status