From e97a0f3414926d2442e82c8531287e4b6e10ef37 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Wed, 9 Mar 2022 16:15:21 -0700 Subject: rename MEMSTRING= -> MEMSTR= Signed-off-by: Sean Whitton --- src/property/lxc.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/property/lxc.lisp') diff --git a/src/property/lxc.lisp b/src/property/lxc.lisp index e914213..b32f091 100644 --- a/src/property/lxc.lisp +++ b/src/property/lxc.lisp @@ -321,8 +321,8 @@ implications." (defun user-container-active-p (host &optional owner) (and (not (service:no-services-p)) - (memstring= (get-hostname host) (lxc-ls owner "--active")))) + (memstr= (get-hostname host) (lxc-ls owner "--active")))) (defun user-container-running-p (host &optional owner) (and (not (service:no-services-p)) - (memstring= (get-hostname host) (lxc-ls owner "--running")))) + (memstr= (get-hostname host) (lxc-ls owner "--running")))) -- cgit v1.2.3