diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-10 10:54:32 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-10 10:54:32 -0700 |
| commit | ae809cf7d95190ca366f3192499f017ab301d590 (patch) | |
| tree | 5fa0f282e48b208d7a5876504a07c85517408d87 /src/property/apt.lisp | |
| parent | fe46aafabf79d4b468209c487c153a0637c153ee (diff) | |
| download | consfigurator-ae809cf7d95190ca366f3192499f017ab301d590.tar.gz | |
APT::APT-CACHE-POLICY-INSTALLED: use DEFINE-CONSTANT
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/property/apt.lisp')
| -rw-r--r-- | src/property/apt.lisp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/property/apt.lisp b/src/property/apt.lisp index fe5e655..de5ffc2 100644 --- a/src/property/apt.lisp +++ b/src/property/apt.lisp @@ -58,7 +58,8 @@ (defun apt-cache-policy (packages) (runlines :env '(:LANG "C") "apt-cache" "policy" packages)) -(defparameter apt-cache-policy-installed #?/^\s+Installed:\s+(?!\(none\))/) +(define-constant apt-cache-policy-installed #?/^\s+Installed:\s+(?!\(none\))/ + :test #'string=) (defun all-installed-p (packages) (loop with n = 0 |