From 8f8c59341e7f420397f79d47af2787ca55fba07b Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sat, 2 Apr 2022 13:55:22 -0700 Subject: rename CONNECTION-TEARDOWN -> CONNECTION-TEAR-DOWN Signed-off-by: Sean Whitton --- src/connection/chroot.lisp | 2 +- src/connection/sudo.lisp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'src/connection') diff --git a/src/connection/chroot.lisp b/src/connection/chroot.lisp index e2aa10c..b681e48 100644 --- a/src/connection/chroot.lisp +++ b/src/connection/chroot.lisp @@ -147,7 +147,7 @@ should be the mount point, without the chroot's root prefixed.") (format nil "chroot ~A sh -c ~A" (sh-escape (slot-value connection 'into)) (sh-escape cmd))) -(defmethod connection-teardown :before ((connection shell-chroot-connection)) +(defmethod connection-tear-down :before ((connection shell-chroot-connection)) (dolist (mount (chroot-mounts connection)) ;; There shouldn't be any processes left running in the chroot after we've ;; finished deploying it, but it's quite easy to end up with things like diff --git a/src/connection/sudo.lisp b/src/connection/sudo.lisp index b8c7731..a8fa3dc 100644 --- a/src/connection/sudo.lisp +++ b/src/connection/sudo.lisp @@ -70,7 +70,7 @@ (string (code-char 13))) :mode #o600))))) -(defmethod connection-teardown :after ((connection sudo-connection)) +(defmethod connection-tear-down :after ((connection sudo-connection)) (when-let ((file (slot-value connection 'password-file))) (delete-remote-trees file))) -- cgit v1.2.3