summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/Apt.hs
diff options
context:
space:
mode:
authorSean Whitton2017-01-31 20:33:50 -0700
committerSean Whitton2017-01-31 20:33:50 -0700
commitba5ae39d1a80e1741971571f7843e877a7a271ff (patch)
tree0a46513dfc06eb59a39e7bdcefa6bf79e859183c /src/Propellor/Property/Apt.hs
parent2220efc954a49a156942b3566350980ed483a64f (diff)
describe Apt.pinnedTo
Diffstat (limited to 'src/Propellor/Property/Apt.hs')
-rw-r--r--src/Propellor/Property/Apt.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Propellor/Property/Apt.hs b/src/Propellor/Property/Apt.hs
index 314cfef1..b18626c6 100644
--- a/src/Propellor/Property/Apt.hs
+++ b/src/Propellor/Property/Apt.hs
@@ -265,6 +265,7 @@ pinnedTo
-> (DebianSuite, PinPriority)
-> RevertableProperty UnixLike UnixLike
pinnedTo ps (suite, pin) = (\p -> pinnedTo' p (suite, pin)) `applyToList` ps
+ `describe` unwords (("pinned to" ++ showSuite suite):ps)
pinnedTo'
:: String