summaryrefslogtreecommitdiff
path: root/src/Propellor/PrivData.hs
diff options
context:
space:
mode:
authorJoey Hess2015-01-19 15:20:12 -0400
committerJoey Hess2015-01-19 15:20:12 -0400
commite28b1ab92bff96ad3daa7d00739ef890359a3ed7 (patch)
treedfcec7e45ae97797eb83b50acd5badca191fb3ed /src/Propellor/PrivData.hs
parenta738a20d797c8f054e04673512e8ebb89b264b26 (diff)
clean up exports
Diffstat (limited to 'src/Propellor/PrivData.hs')
-rw-r--r--src/Propellor/PrivData.hs16
1 files changed, 14 insertions, 2 deletions
diff --git a/src/Propellor/PrivData.hs b/src/Propellor/PrivData.hs
index 53d5fdba..9e35274a 100644
--- a/src/Propellor/PrivData.hs
+++ b/src/Propellor/PrivData.hs
@@ -1,6 +1,18 @@
{-# LANGUAGE PackageImports #-}
-module Propellor.PrivData where
+module Propellor.PrivData (
+ withPrivData,
+ withSomePrivData,
+ addPrivData,
+ setPrivData,
+ dumpPrivData,
+ editPrivData,
+ filterPrivData,
+ listPrivDataFields,
+ makePrivDataDir,
+ decryptPrivData,
+ PrivMap,
+) where
import Control.Applicative
import System.IO
@@ -111,7 +123,7 @@ getLocalPrivData field context =
type PrivMap = M.Map (PrivDataField, Context) PrivData
-{- Get only the set of PrivData that the Host's Info says it uses. -}
+-- | Get only the set of PrivData that the Host's Info says it uses.
filterPrivData :: Host -> PrivMap -> PrivMap
filterPrivData host = M.filterWithKey (\k _v -> S.member k used)
where