From b816e40e2618a8932144bceb7c7039adc5c44c11 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sat, 5 Dec 2015 15:48:03 -0400 Subject: Added UncheckedProperty type, along with unchecked to indicate a Property needs its result checked, and checkResult and changesFile to check for changes. --- src/Propellor/Property/Apt.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/Propellor/Property') diff --git a/src/Propellor/Property/Apt.hs b/src/Propellor/Property/Apt.hs index fd6230e8..83ad2cda 100644 --- a/src/Propellor/Property/Apt.hs +++ b/src/Propellor/Property/Apt.hs @@ -159,7 +159,8 @@ removed ps = check (or <$> isInstalled' ps) go go = runApt $ ["-y", "remove"] ++ ps buildDep :: [Package] -> Property NoInfo -buildDep ps = robustly go +buildDep ps = trivial (robustly go) + `changesFile` "/var/lib/dpkg/status" `describe` (unwords $ "apt build-dep":ps) where go = runApt $ ["-y", "build-dep"] ++ ps -- cgit v1.2.3