summaryrefslogtreecommitdiff
path: root/src/Propellor/Types/MetaTypes.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Propellor/Types/MetaTypes.hs')
-rw-r--r--src/Propellor/Types/MetaTypes.hs13
1 files changed, 4 insertions, 9 deletions
diff --git a/src/Propellor/Types/MetaTypes.hs b/src/Propellor/Types/MetaTypes.hs
index 6033ec27..ce2b1411 100644
--- a/src/Propellor/Types/MetaTypes.hs
+++ b/src/Propellor/Types/MetaTypes.hs
@@ -2,7 +2,6 @@
module Propellor.Types.MetaTypes (
MetaType(..),
- OS(..),
UnixLike,
Linux,
DebianLike,
@@ -26,15 +25,11 @@ module Propellor.Types.MetaTypes (
EqT,
) where
+import Propellor.Types.OS
+
data MetaType
- = Targeting OS -- ^ A target OS of a Property
- | WithInfo -- ^ Indicates that a Property has associated Info
-
-data OS
- = OSDebian
- | OSBuntish -- ^ A well-known Debian derivative founded by a space tourist. The actual name of this distribution is not used in Propellor per <http://joeyh.name/blog/entry/trademark_nonsense/>
- | OSFreeBSD
- deriving (Show, Eq)
+ = Targeting TargetOS -- ^ A target OS of a Property
+ | WithInfo -- ^ Indicates that a Property has associated Info
-- | Any unix-like system
type UnixLike = MetaTypes '[ 'Targeting 'OSDebian, 'Targeting 'OSBuntish, 'Targeting 'OSFreeBSD ]