@@ -161,7 +161,7 @@ In Rel8, we can write this query as::
161 limit 3 $
161 limit 3 $
162 orderBy (commentCreatedAt >$< desc) do
162 orderBy (commentCreatedAt >$< desc) do
163 comment <- each commentSchema
163 comment <- each commentSchema
164− where (commentPostId comment ==. postId post)
164+ where_ (commentPostId comment ==. postId post)
166 return (post, tags, latestComments)
166 return (post, tags, latestComments)