diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Propellor/Property/Sbuild.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Propellor/Property/Sbuild.hs b/src/Propellor/Property/Sbuild.hs index 4f3fcc26..1ff4876a 100644 --- a/src/Propellor/Property/Sbuild.hs +++ b/src/Propellor/Property/Sbuild.hs @@ -472,7 +472,7 @@ schrootPiupartsConf (SbuildSchroot s a) = sidHostArchSchroot :: SbuildSchroot -> Propellor Bool sidHostArchSchroot (SbuildSchroot suite arch) = do maybeOS <- getOS - case maybeOS of - Nothing -> return False + return $ case maybeOS of + Nothing -> False Just (System _ hostArch) -> - return $ suite == "unstable" && hostArch == arch + suite == "unstable" && hostArch == arch |