From 0e39d53352b982022747e451676bc6a66e3d9acc Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Tue, 20 Oct 2015 23:37:21 -0400
Subject: refactor

---
 src/Propellor/PrivData.hs | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/Propellor/PrivData.hs')

diff --git a/src/Propellor/PrivData.hs b/src/Propellor/PrivData.hs
index 070070f0..aac37d14 100644
--- a/src/Propellor/PrivData.hs
+++ b/src/Propellor/PrivData.hs
@@ -17,6 +17,7 @@ module Propellor.PrivData (
 	makePrivDataDir,
 	decryptPrivData,
 	readPrivData,
+	readPrivDataFile,
 	PrivMap,
 	PrivInfo,
 	forceHostContext,
@@ -254,6 +255,9 @@ decryptPrivData = readPrivData <$> gpgDecrypt privDataFile
 readPrivData :: String -> PrivMap
 readPrivData = fromMaybe M.empty . readish
 
+readPrivDataFile :: FilePath -> IO PrivMap
+readPrivDataFile f = readPrivData <$> readFileStrictAnyEncoding f
+
 makePrivDataDir :: IO ()
 makePrivDataDir = createDirectoryIfMissing False privDataDir
 
-- 
cgit v1.3-2-g0d8e