diff options
Diffstat (limited to 'Notmuch/SearchResult.hs')
-rw-r--r-- | Notmuch/SearchResult.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Notmuch/SearchResult.hs b/Notmuch/SearchResult.hs index 94bfecf..a59fa9c 100644 --- a/Notmuch/SearchResult.hs +++ b/Notmuch/SearchResult.hs @@ -38,7 +38,7 @@ instance HasNotmuchId SearchResult where instance FromJSON SearchResult where - parseJSON (Object v) = SearchResult <$> ((ThreadID . ("thread:"++)) <$> v .: "thread") + parseJSON (Object v) = SearchResult <$> (ThreadID . ("thread:"++) <$> v .: "thread") <*> (posixSecondsToUTCTime . fromInteger <$> v .: "timestamp") <*> v .: "date_relative" <*> v .:? "subject" .!= "" |