dev: lib: ReportTypes: hlint fix
This commit is contained in:
parent
7102d6f9e8
commit
0c179c7e28
@ -89,7 +89,7 @@ data PeriodicReport a b =
|
|||||||
} deriving (Show, Functor, Generic, ToJSON)
|
} deriving (Show, Functor, Generic, ToJSON)
|
||||||
|
|
||||||
instance Bifunctor PeriodicReport where
|
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 =
|
data PeriodicReportRow a b =
|
||||||
PeriodicReportRow
|
PeriodicReportRow
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user