summaryrefslogtreecommitdiff
path: root/src/Propellor/Property
diff options
context:
space:
mode:
authorJoey Hess2017-11-17 14:38:44 -0400
committerJoey Hess2017-11-17 14:38:44 -0400
commitb2662cd33467d151b5bb84251750ac80d2dea5cd (patch)
tree8d7e49705d6824f4947bab1ef3b92124df56f0b6 /src/Propellor/Property
parent68c1b54acc5a2ffb3aecd3ec069a0cd3ee14f1c1 (diff)
fix error msg
Diffstat (limited to 'src/Propellor/Property')
-rw-r--r--src/Propellor/Property/Machine.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/Property/Machine.hs b/src/Propellor/Property/Machine.hs
index bea1c040..22bc9a58 100644
--- a/src/Propellor/Property/Machine.hs
+++ b/src/Propellor/Property/Machine.hs
@@ -82,4 +82,4 @@ marvell = checkArchitecture [ARMEL] $
checkArchitecture :: [Architecture] -> Property DebianLike -> Property DebianLike
checkArchitecture as p = withOS (getDesc p) $ \w o -> case o of
(Just (System _ arch)) | arch `elem` as -> ensureProperty w p
- _ -> unsupportedOS' -- error $ "Machine needs architecture to be one of: " ++ show as
+ _ -> error $ "Machine needs architecture to be one of: " ++ show as