diff options
| author | Kierán Meinhardt <kieran.meinhardt@gmail.com> | 2020-09-22 23:40:00 +0200 |
|---|---|---|
| committer | Kierán Meinhardt <kieran.meinhardt@gmail.com> | 2020-09-23 00:10:07 +0200 |
| commit | ca8439b6787eb238d7b07544dfc728488f3c71b6 (patch) | |
| tree | 0f812affaa5c569248ee2c1c7e8b39c6e8a405c7 /Notmuch/SearchResult.hs | |
| parent | 121d703bcd3ecbaba031499070907251b5eae1a9 (diff) | |
lint
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" .!= "" |