on master help sign in
Fix min/max
commit912ec098231726877aac5eee662fde8ad62d861b authorOllie Charles <ollie@ocharles.org.uk> dateMon 29 Mar 2021, 15:23 (6 years ago) parent410af83
1 file changed+2−2
src/Rel8/Expr/Aggregate.hs+2−2
src/Rel8/Expr/Aggregate.hs+2−2
@@ -101,7 +101,7 @@ or = unsafeMakeAggregate toPrimExpr fromPrimExpr $
101101max :: Sql DBMax a => Expr a -> Aggregate (Expr a)
102102max = unsafeMakeAggregate toPrimExpr fromPrimExpr $
103103 Just Aggregator
104− { operation = Opaleye.AggrSum
104+ { operation = Opaleye.AggrMax
105105 , ordering = []
106106 , distinction = Opaleye.AggrAll
107107 }
@@ -111,7 +111,7 @@ max = unsafeMakeAggregate toPrimExpr fromPrimExpr $
111111min :: Sql DBMin a => Expr a -> Aggregate (Expr a)
112112min = unsafeMakeAggregate toPrimExpr fromPrimExpr $
113113 Just Aggregator
114− { operation = Opaleye.AggrSum
114+ { operation = Opaleye.AggrMin
115115 , ordering = []
116116 , distinction = Opaleye.AggrAll
117117 }