aboutsummaryrefslogtreecommitdiff
path: root/src/deployment.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/deployment.lisp')
-rw-r--r--src/deployment.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/deployment.lisp b/src/deployment.lisp
index b28fc69..52e0eda 100644
--- a/src/deployment.lisp
+++ b/src/deployment.lisp
@@ -331,7 +331,7 @@ Connection attributes, by contrast, are propagated as usual."
collect (car cell) into accum
finally (if (eql k :data)
(pushnew-hostattrs :data (nreverse accum))
- (apply #'push-hostattrs k (nreverse accum)))))
+ (push-hostattrs k (nreverse accum)))))
(dolist (system (propspec-systems (host-propspec host)))
(pushnew system (slot-value (host-propspec *host*) 'systems)))
(setf (getf properties :host) host)))