diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2022-03-09 16:15:21 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-03-09 16:15:21 -0700 |
| commit | e97a0f3414926d2442e82c8531287e4b6e10ef37 (patch) | |
| tree | 841bfa8937d02f4eca1dae79af69c1ca3d111090 /src/property/lxc.lisp | |
| parent | fc08e3fe0697f9347ceea48baf8162b9203dd1dd (diff) | |
| download | consfigurator-e97a0f3414926d2442e82c8531287e4b6e10ef37.tar.gz | |
rename MEMSTRING= -> MEMSTR=
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/property/lxc.lisp')
| -rw-r--r-- | src/property/lxc.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
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")))) |