Commit 280442a72c2963a0ceb17124b0d230b807ff274e

Thomas de Grivel 2019-10-17T16:09:51

show message after sync host

1
2
3
4
5
6
7
8
9
10
11
diff --git a/core/resource.lisp b/core/resource.lisp
index 72b9aa3..dc27ace 100644
--- a/core/resource.lisp
+++ b/core/resource.lisp
@@ -209,4 +209,5 @@
 (defmethod sync ((host host))
   (with-host host
     (resource-additional-specs host (host-os host))
-    (call-next-method)))
+    (call-next-method)
+    (format t "~&sync ~A complete~%" (resource-id host))))