@@ -88,15 +88,15 @@ spec = do
8888 let
8989 statement :: Query Tables '[] SumAndCol1
9090 statement =
91− select (sum_ All #col2 `As` #sum :* #col1 `As` #col1 :* Nil)
91+ select (sum_ #col2 `As` #sum :* #col1 `As` #col1 :* Nil)
9292 ( from (Table (#table1 `As` #table1))
9393 & group (By #col1 :* Nil)
94− & having (#col1 + sum_ All #col2 >* 1) )
94+ & having (#col1 + sum_ #col2 >* 1) )
9595 statement `queryRenders`
96− "SELECT sum(ALL col2) AS sum, col1 AS col1\
96+ "SELECT sum(col2) AS sum, col1 AS col1\
9797 \ FROM table1 AS table1\
9898 \ GROUP BY col1\
99− \ HAVING ((col1 + sum(ALL col2)) > 1);"
99+ \ HAVING ((col1 + sum(col2)) > 1);"
100100 it "correctly renders simple INSERTs" $ do
101101 let
102102 statement :: Manipulation Tables '[] '[]