aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/propspec.lisp3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/propspec.lisp b/src/propspec.lisp
index 987f2c6..1275d40 100644
--- a/src/propspec.lisp
+++ b/src/propspec.lisp
@@ -34,8 +34,7 @@ sufficient to define all the properties you intend to apply to hosts.
Consfigurator uses this information when starting up remote Lisp images to
effect deployments: it sends over the ASDF systems specified by SYSTEMS."
- (when (atom systems)
- (setq systems (list systems)))
+ (setq systems (ensure-cons systems))
(let ((sym (intern "*CONSFIG*")))
`(eval-when (:compile-toplevel :load-toplevel :execute)
(defparameter ,sym ',systems