cadey
/
propellor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

propellor spin

This commit is contained in:
Joey Hess 2014-06-01 02:53:42 -04:00
parent 30440e352d
commit 442dbe2311
Failed to extract signature
2 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
config-joey.hs
View File

@ -221,6 +221,7 @@ standardSystem hn suite arch = host hn
& os (System (Debian suite) arch) & os (System (Debian suite) arch)
& Apt.stdSourcesList suite & Apt.stdSourcesList suite
`onChange` Apt.upgrade `onChange` Apt.upgrade
& Apt.cacheCleaned
& Apt.installed ["etckeeper"] & Apt.installed ["etckeeper"]
& Apt.installed ["ssh"] & Apt.installed ["ssh"]
& GitHome.installedFor "root" & GitHome.installedFor "root"
@ -245,6 +246,7 @@ standardContainer name suite arch = Docker.container name (dockerImage system)
& os (System (Debian suite) arch) & os (System (Debian suite) arch)
& Apt.stdSourcesList suite & Apt.stdSourcesList suite
& Apt.unattendedUpgrades & Apt.unattendedUpgrades
& Apt.cacheCleaned
where where
system = System (Debian suite) arch system = System (Debian suite) arch

6
src/Propellor/Property/Apt.hs
View File

@ -254,3 +254,9 @@ trustsKey k = RevertableProperty trust untrust
hPutStr h (pubkey k) hPutStr h (pubkey k)
hClose h hClose h
nukeFile $ f ++ "~" -- gpg dropping nukeFile $ f ++ "~" -- gpg dropping
-- | Cleans apt's cache of downloaded packages to avoid using up disk
-- space.
cacheCleaned :: Property
cacheCleaned = cmdProperty "apt-get" ["clean"]
`describe` "apt cache cleaned"