dev: lib: ReportTypes: hlint fix
This commit is contained in:
parent
b9d2aa7b54
commit
0a501941ee
@ -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