From e28b1ab92bff96ad3daa7d00739ef890359a3ed7 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 19 Jan 2015 15:20:12 -0400 Subject: clean up exports --- src/Propellor/PrivData.hs | 16 ++++++++++++++-- 1 file changed, 14 insertions(+), 2 deletions(-) (limited to 'src/Propellor/PrivData.hs') 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 -- cgit v1.2.3