Add FromJSON instance for Torrent datatype

2 files changed, 2 insertions, 1 deletions

diff --git a/TODO.org b/TODO.org
index 24b33d0c..a7ce16fb 100644
--- a/TODO.org
+++ b/TODO.org
@@ -1,3 +1,4 @@
+* TODO version 0.0.0.0
 * TODO torrent linting for indexing
 * TODO move PeerClient to Data.Torrent.Client
 * TODO Word64 for Progress fields
diff --git a/src/Data/Torrent.hs b/src/Data/Torrent.hs
index 8d62b068..2733956c 100644
--- a/src/Data/Torrent.hs
+++ b/src/Data/Torrent.hs
@@ -203,7 +203,7 @@ instance ToJSON NominalDiffTime where
 instance FromJSON NominalDiffTime where
   parseJSON v = utcTimeToPOSIXSeconds <$> parseJSON v
 
-$(deriveToJSON (L.map Char.toLower . L.dropWhile isLower) ''Torrent)
+$(deriveJSON (L.map Char.toLower . L.dropWhile isLower) ''Torrent)
 
 makeLensesFor
   [ ("tAnnounce"    , "announce"    )