aboutsummaryrefslogtreecommitdiff
path: root/src/propspec.lisp
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2021-05-29 15:12:54 -0700
committerSean Whitton <spwhitton@spwhitton.name>2021-05-30 10:03:03 -0700
commitedbba484918f6de83680a5b29e561fba981e05e9 (patch)
tree9418abacd664e22fe7dde4137d8962825943d168 /src/propspec.lisp
parentdc396f800b11fc9aa4bae07df268ad51a2740d8b (diff)
downloadconsfigurator-edbba484918f6de83680a5b29e561fba981e05e9.tar.gz
factor out ENSURE-HOST & call it in hostattrs accessors
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/propspec.lisp')
-rw-r--r--src/propspec.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/propspec.lisp b/src/propspec.lisp
index e4e8832..92a73e8 100644
--- a/src/propspec.lisp
+++ b/src/propspec.lisp
@@ -207,7 +207,7 @@ PRINT-OBJECT."))
"Convert a property application specification expression into a property
application specification proper by associating it with a list of ASDF
systems."
- (if systems-supplied-p
+ (if (or systems-supplied-p (not propspec))
(make-instance 'unpreprocessed-propspec
:systems systems :propspec propspec)
(make-instance 'unpreprocessed-propspec :propspec propspec)))