@@ -165,6 +165,7 @@ decodeFile :: FromJSON a
165 => FilePath
165 => FilePath
166 -> IO (Maybe a)
166 -> IO (Maybe a)
167decodeFile fp = decodeHelper (Y.decodeFile fp) >>= either throwIO (return . either (const Nothing) id)
167decodeFile fp = decodeHelper (Y.decodeFile fp) >>= either throwIO (return . either (const Nothing) id)
168+{-# DEPRECATED decodeFile "Please use decodeFileEither, which does not confused type-directed and runtime exceptions." #-}
169-- | A version of 'decodeFile' which should not throw runtime exceptions.
170-- | A version of 'decodeFile' which should not throw runtime exceptions.