diff options
| -rw-r--r-- | Propellor/Property/Dns.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Propellor/Property/Dns.hs b/Propellor/Property/Dns.hs index 19844650..0708417d 100644 --- a/Propellor/Property/Dns.hs +++ b/Propellor/Property/Dns.hs @@ -245,7 +245,7 @@ writeZonePropellorFile f z = writeFile (zonePropellorFile f) (show z) readZonePropellorFile :: FilePath -> IO (Maybe Zone) readZonePropellorFile f = catchDefaultIO Nothing $ - readish <$> readFile (zonePropellorFile f) + readish <$> readFileStrict (zonePropellorFile f) -- | Generating a zone file. genZoneFile :: Zone -> String |