summaryrefslogtreecommitdiff
path: root/src/Propellor/Types/PrivData.hs
diff options
context:
space:
mode:
authorJoey Hess2015-01-15 20:15:01 -0400
committerJoey Hess2015-01-15 20:15:01 -0400
commitc7609c824ba1ce7cdcdf9c646b721db80333f04b (patch)
treed35862ed87d9b61d73d45013085642dc1c0fa2d7 /src/Propellor/Types/PrivData.hs
parentee7135dbfd87c1be06ce7777e9e21fd6548c420e (diff)
Add descriptions of how to set missing fields to --list-fields output. (Minor API changes)
Diffstat (limited to 'src/Propellor/Types/PrivData.hs')
-rw-r--r--src/Propellor/Types/PrivData.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Propellor/Types/PrivData.hs b/src/Propellor/Types/PrivData.hs
index c7909a6b..6b3c35a2 100644
--- a/src/Propellor/Types/PrivData.hs
+++ b/src/Propellor/Types/PrivData.hs
@@ -24,9 +24,11 @@ data PrivDataSource
| PrivDataSourceFileFromCommand PrivDataField FilePath String
| PrivDataSource PrivDataField String
+type PrivDataSourceDesc = String
+
class IsPrivDataSource s where
privDataField :: s -> PrivDataField
- describePrivDataSource :: s -> Maybe String
+ describePrivDataSource :: s -> Maybe PrivDataSourceDesc
instance IsPrivDataSource PrivDataField where
privDataField = id