summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSean Whitton2017-02-02 21:06:47 -0700
committerSean Whitton2017-02-02 21:06:47 -0700
commit2c53b0f0f098f3112782a52f4b9575ec36369b16 (patch)
tree2b500581dd431f9a359ecf963b4c8aa447b53bd2
parent626f13c408deb7b8e6940b213f7a0081bbf8fe23 (diff)
add Explanation: lines to pref files
-rw-r--r--src/Propellor/Property/Apt.hs6
1 files changed, 4 insertions, 2 deletions
diff --git a/src/Propellor/Property/Apt.hs b/src/Propellor/Property/Apt.hs
index ba5fd5e7..218c7197 100644
--- a/src/Propellor/Property/Apt.hs
+++ b/src/Propellor/Property/Apt.hs
@@ -117,7 +117,8 @@ suiteAvailablePinned s pin = available <!> unavailable
available :: Property Debian
available = tightenTargets $ combineProperties (desc True) $ props
& File.hasContent prefFile
- [ "Package: *"
+ [ "Explanation: This file added by propellor"
+ , "Package: *"
, "Pin: release " ++ suitePin s
, "Pin-Priority: " ++ show pin
]
@@ -281,7 +282,8 @@ pinnedTo' p (suite, pin) =
<!> (tightenTargets $ File.notPresent prefFile)
where
prefs =
- [ "Package: " ++ p
+ [ "Explanation: This file added by propellor"
+ , "Package: " ++ p
, "Pin: release " ++ suitePin suite
, "Pin-Priority: " ++ show pin
]