dev: lib: ReportTypes: hlint fix

This commit is contained in:
Simon Michael 2022-09-14 16:57:54 -10:00
parent b9d2aa7b54
commit 0a501941ee

View File

@ -89,7 +89,7 @@ data PeriodicReport a b =
} deriving (Show, Functor, Generic, ToJSON)
instance Bifunctor PeriodicReport where
bimap f g pr = pr{prRows = map (bimap f g) $ prRows pr, prTotals = fmap g $ prTotals pr}
bimap f g pr = pr{prRows = map (bimap f g) $ prRows pr, prTotals = g <$> prTotals pr}
data PeriodicReportRow a b =
PeriodicReportRow