From cd968c5f9439834bad4d9acdc168c16e2dadb190 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 17 Nov 2017 14:07:12 -0400 Subject: propellor spin --- src/Propellor/Property/Machine.hs | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/src/Propellor/Property/Machine.hs b/src/Propellor/Property/Machine.hs index afffe143..bea1c040 100644 --- a/src/Propellor/Property/Machine.hs +++ b/src/Propellor/Property/Machine.hs @@ -40,10 +40,10 @@ data Marvell_SheevaPlug_BootDevice marvell_SheevaPlug :: Marvell_SheevaPlug_BootDevice -> Property (HasInfo + DebianLike) marvell_SheevaPlug Marvell_SheevaPlug_SDCard = FlashKernel.installed "Marvell SheevaPlug Reference Board" - `requires` kirkwood + `requires` marvell marvell_SheevaPlug Marvell_SheevaPlug_ESATA = FlashKernel.installed "Marvell eSATA SheevaPlug Reference Board" - `requires` kirkwood + `requires` marvell -- | Cubietech Cubietruck (untested) -- @@ -75,9 +75,9 @@ lpae :: Property DebianLike lpae = checkArchitecture [ARMHF, ARMEL] $ Apt.installed ["linux-image-armmp-lpae"] -kirkwood :: Property DebianLike -kirkwood = checkArchitecture [ARMEL] $ - Apt.installed ["linux-image-kirkwwood"] +marvell :: Property DebianLike +marvell = checkArchitecture [ARMEL] $ + Apt.installed ["linux-image-marvell"] checkArchitecture :: [Architecture] -> Property DebianLike -> Property DebianLike checkArchitecture as p = withOS (getDesc p) $ \w o -> case o of -- cgit v1.2.3