From 6512717f2e0e9d58b89501ba2e08c117a0486e9e Mon Sep 17 00:00:00 2001 From: FĂ©lix Sipma Date: Tue, 5 Apr 2016 18:04:49 +0200 Subject: Apt: add periodicUpdates --- src/Propellor/Property/Apt.hs | 13 +++++++++++-- 1 file changed, 11 insertions(+), 2 deletions(-) (limited to 'src/Propellor/Property/Apt.hs') diff --git a/src/Propellor/Property/Apt.hs b/src/Propellor/Property/Apt.hs index 5771750d..fd70e37d 100644 --- a/src/Propellor/Property/Apt.hs +++ b/src/Propellor/Property/Apt.hs @@ -258,6 +258,15 @@ unattendedUpgrades = enable disable ("Unattended-Upgrade::Origins-Pattern { \"o=Debian,a="++showSuite suite++"\"; };") _ -> noChange +-- | Enable periodic updates. +periodicUpdates :: Property DebianLike +periodicUpdates = tightenTargets $ "/etc/apt/apt.conf.d/02periodic" `File.hasContent` + [ "APT::Periodic::Enable \"1\";" + , "APT::Periodic::Update-Package-Lists \"1\";" + , "APT::Periodic::Download-Upgradeable-Packages \"1\";" + , "APT::Periodic::Verbose \"1\";" + ] + type DebconfTemplate = String type DebconfTemplateType = String type DebconfTemplateValue = String @@ -265,8 +274,8 @@ type DebconfTemplateValue = String -- | Preseeds debconf values and reconfigures the package so it takes -- effect. reConfigure :: Package -> [(DebconfTemplate, DebconfTemplateType, DebconfTemplateValue)] -> Property DebianLike -reConfigure package vals = tightenTargets $ - reconfigure +reConfigure package vals = tightenTargets $ + reconfigure `requires` setselections `describe` ("reconfigure " ++ package) where -- cgit v1.2.3