diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2023-03-09 09:46:24 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2023-03-09 09:46:24 -0700 |
| commit | 32efbbcc3b22d2625a5fe3413262aa9e5d83f758 (patch) | |
| tree | 547169b5a9e225f797b00ef9eca4894e357bcbec /src | |
| parent | ee162259b316550afc201979cd10be7f3343c358 (diff) | |
| download | consfigurator-32efbbcc3b22d2625a5fe3413262aa9e5d83f758.tar.gz | |
FIREWALLD::%FIREWALL-CMD: ensure that OFFLINE-APPLY param is a list
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src')
| -rw-r--r-- | src/property/firewalld.lisp | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/property/firewalld.lisp b/src/property/firewalld.lisp index bd69252..6bac2f3 100644 --- a/src/property/firewalld.lisp +++ b/src/property/firewalld.lisp @@ -54,7 +54,9 @@ apply (offline-apply apply) (--permanent t) &aux (check-fn (if complement-check #'plusp #'zerop))) (:apply - (setq check (ensure-list check) apply (ensure-list apply)) + (setq check (ensure-list check) + apply (ensure-list apply) + offline-apply (ensure-list offline-apply)) (labels ((search-warning (output) (and warning (search output warning) :no-change)) (permanent-change () |