Commit 9c5c031cdd27f9d09a043784605a2d305799be89

Thomas de Grivel 2018-07-10T12:36:01

type declaration

1
2
3
4
5
6
7
8
9
10
11
12
13
diff --git a/core/operation.lisp b/core/operation.lisp
index 58d151b..4dc7531 100644
--- a/core/operation.lisp
+++ b/core/operation.lisp
@@ -92,7 +92,7 @@
                   :property property
                   :host (current-host)
                   :os os))
-         (push op operations)))
+         (pushnew (the operation op) operations)))
     (nreverse operations)))
 
 (defgeneric resource-op-properties (resource))