From 79bcac46054b8923b163c17167b77ee9a21be988 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sat, 2 Apr 2022 14:15:44 -0700 Subject: rename RUN-FAILED accessors Signed-off-by: Sean Whitton --- src/property/firewalld.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/property/firewalld.lisp') diff --git a/src/property/firewalld.lisp b/src/property/firewalld.lisp index 6c6f337..8d0835c 100644 --- a/src/property/firewalld.lisp +++ b/src/property/firewalld.lisp @@ -67,7 +67,7 @@ ((run-failed (lambda (c) (when (and warning - (search warning (failed-stdout c))) + (search warning (run-failed-stdout c))) (return-from permanent-change :no-change))))) (apply #'mrun "firewall-offline-cmd" offline-apply)) (if --permanent -- cgit v1.2.3