Update changelog

bitemyapp · Aug 14, 2023 · f92378d · f92378d
1 parent 44e9eda
commit f92378d
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 2 deletions.
diff --git a/changelog.md b/changelog.md
@@ -1,3 +1,9 @@
+3.5.10.2
+========
+- @RikvanToor
+    - [#373](https://github.com/bitemyapp/esqueleto/pull/373)
+        - Fix name clashes when using CTEs multiple times
+
 3.5.10.1
 ========
 - @9999years

diff --git a/src/Database/Esqueleto/Experimental/From/CommonTableExpression.hs b/src/Database/Esqueleto/Experimental/From/CommonTableExpression.hs
@@ -56,8 +56,8 @@ with query = do
     pure $ From $ do
         newIdent <- newIdentFor (DBName "cte")
         localRef <- toAliasReference newIdent ref
-        let lh = useIdent info ident <> " AS " <> useIdent info newIdent
-        pure (localRef, (\_ info -> (lh, mempty)))
+        let makeLH info = useIdent info ident <> " AS " <> useIdent info newIdent
+        pure (localRef, (\_ info -> (makeLH info, mempty)))
 
 -- | @WITH@ @RECURSIVE@ allows one to make a recursive subquery, which can
 -- reference itself. Like @WITH@, this is supported in most modern SQL engines.