summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/Postfix.hs
diff options
context:
space:
mode:
authorJoey Hess2015-12-31 12:03:05 -0400
committerJoey Hess2015-12-31 12:03:05 -0400
commit9c204a40ac68862dc50fede4419cda7e75906a04 (patch)
tree22095b1b0e571440d330c5e42cdef4ff4bb1db14 /src/Propellor/Property/Postfix.hs
parent39e1237146c046fd2f02fcc492a73079ee77a96f (diff)
propellor spin
Diffstat (limited to 'src/Propellor/Property/Postfix.hs')
-rw-r--r--src/Propellor/Property/Postfix.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/Property/Postfix.hs b/src/Propellor/Property/Postfix.hs
index c5abde6b..b8599376 100644
--- a/src/Propellor/Property/Postfix.hs
+++ b/src/Propellor/Property/Postfix.hs
@@ -194,7 +194,7 @@ formatServiceLine s = unwords $ map pad
v f sel = maybe "-" f (sel (serviceOpts s))
bool True = "y"
bool False = "n"
- pad (n, s) = s ++ replicate (n - 1 - length s) ' '
+ pad (n, t) = t ++ replicate (n - 1 - length t) ' '
-- | Note that this does not handle multi-line service entries,
-- in which subsequent lines are indented. `serviceLine` does not generate