summaryrefslogtreecommitdiff
path: root/src/Propellor/Types/MetaTypes.hs
diff options
context:
space:
mode:
authorJoey Hess2016-03-25 16:04:31 -0400
committerJoey Hess2016-03-25 16:04:31 -0400
commit4694a4c36cca1c7b52421297a62548d8bbb2ec0b (patch)
tree1e01ac4a71ce151c017f5f7d9e8feeb76059f3a9 /src/Propellor/Types/MetaTypes.hs
parente28f49b7d1ae361e42809977bf12d3f126c3d90d (diff)
continued porting
Diffstat (limited to 'src/Propellor/Types/MetaTypes.hs')
-rw-r--r--src/Propellor/Types/MetaTypes.hs9
1 files changed, 6 insertions, 3 deletions
diff --git a/src/Propellor/Types/MetaTypes.hs b/src/Propellor/Types/MetaTypes.hs
index 80fa454e..6545c924 100644
--- a/src/Propellor/Types/MetaTypes.hs
+++ b/src/Propellor/Types/MetaTypes.hs
@@ -4,8 +4,9 @@ module Propellor.Types.MetaTypes (
MetaType(..),
OS(..),
UnixLike,
- Debian,
+ Linux,
DebianLike,
+ Debian,
Buntish,
FreeBSD,
HasInfo,
@@ -37,11 +38,13 @@ data OS
-- | Any unix-like system
type UnixLike = MetaTypes '[ 'Targeting 'OSDebian, 'Targeting 'OSBuntish, 'Targeting 'OSFreeBSD ]
+-- | Any linux system
+type Linux = MetaTypes '[ 'Targeting 'OSDebian, 'Targeting 'OSBuntish ]
+-- | Debian and derivatives.
+type DebianLike = Debian + Buntish
type Debian = MetaTypes '[ 'Targeting 'OSDebian ]
type Buntish = MetaTypes '[ 'Targeting 'OSBuntish ]
type FreeBSD = MetaTypes '[ 'Targeting 'OSFreeBSD ]
--- | Debian and derivatives.
-type DebianLike = Debian + Buntish
-- | Used to indicate that a Property adds Info to the Host where it's used.
type HasInfo = MetaTypes '[ 'WithInfo ]