summaryrefslogtreecommitdiff
path: root/src/Propellor/PropAccum.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Propellor/PropAccum.hs')
-rw-r--r--src/Propellor/PropAccum.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/PropAccum.hs b/src/Propellor/PropAccum.hs
index d2736b50..4b2a5ddb 100644
--- a/src/Propellor/PropAccum.hs
+++ b/src/Propellor/PropAccum.hs
@@ -48,7 +48,7 @@ class PropAccum h where
instance PropAccum Host where
(Host hn ps is) & p = Host hn (ps ++ [toProp p])
(is <> getInfoRecursive p)
- (Host hn ps is) &^ p = Host hn ([toProp p] ++ ps)
+ (Host hn ps is) &^ p = Host hn (toProp p : ps)
(getInfoRecursive p <> is)
getProperties = hostProperties