diff options
Diffstat (limited to 'src/property/apt.lisp')
| -rw-r--r-- | src/property/apt.lisp | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/src/property/apt.lisp b/src/property/apt.lisp index 7908e55..fa5948e 100644 --- a/src/property/apt.lisp +++ b/src/property/apt.lisp @@ -54,6 +54,15 @@ (:apply (apt-get :princ "-y" "remove" packages))) +(defproplist service-installed-running :posix (package) + "Where PACKAGE installs a service named PACKAGE, ensure it is installed and +running. + +E.g. (APT:SERVICE-INSTALLED-RUNNING \"apache2\")." + (:desc #?"${package} installed and running") + (installed package) + (service:running package)) + (defprop mirror :posix (uri) (:desc #?"${uri} apt mirror selected") (:hostattrs @@ -75,6 +84,11 @@ (:desc #?"Uses parent's apt proxy") (proxy (get-parent-hostattrs-car :apt.proxy))) +(defproplist uses-local-cacher :posix () + (:desc "apt uses local apt cacher") + (service-installed-running "apt-cacher-ng") + (proxy "http://localhost:3142")) + (defun get-mirrors () (or (get-hostattrs :apt.mirror) (call-with-os #'get-default-mirrors))) |