Use pg-entity 0.0.4.4

flora-pm · Dec 23, 2023 · 5675833 · 5675833
1 parent df51ba9
commit 5675833
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 9 deletions.
diff --git a/cabal.project.freeze b/cabal.project.freeze
@@ -272,7 +272,7 @@ constraints: any.Cabal ==3.8.1.0,
              any.password-types ==1.0.0.0,
              any.pcre2 ==2.2.1,
              any.pem ==0.2.4,
-             any.pg-entity ==0.0.4.3,
+             any.pg-entity ==0.0.4.4,
              pg-entity -book -prod,
              any.pg-transact ==0.3.2.0,
              any.pg-transact-effectful ==0.0.1.0,
@@ -446,4 +446,3 @@ constraints: any.Cabal ==3.8.1.0,
              any.zigzag ==0.0.1.0,
              any.zlib ==0.6.3.0,
              zlib -bundled-c-zlib -non-blocking-ffi -pkg-config
-index-state: hackage.haskell.org 2023-11-22T07:29:39Z
diff --git a/src/core/Flora/Model/Package/Query.hs b/src/core/Flora/Model/Package/Query.hs
@@ -388,12 +388,12 @@ getRequirementsQuery
   -> Query
 getRequirementsQuery singleComponentType =
   selectors
-    <> if singleComponentType
-      then tablesSingleType
-      else
-        tablesManyTypes
-          <> whereClause
-          <> orderClause
+    <> " "
+    <> (if singleComponentType then tablesSingleType else tablesManyTypes)
+    <> " "
+    <> whereClause
+    <> " "
+    <> orderClause
   where
     selectors =
       [sql|

diff --git a/test/Flora/PackageSpec.hs b/test/Flora/PackageSpec.hs
@@ -139,7 +139,7 @@ testBytestringDependents :: TestEff ()
 testBytestringDependents = do
   results <- Query.getAllPackageDependentsWithLatestVersion (Namespace "haskell") (PackageName "bytestring") (0, 30) Nothing
   assertEqual
-    24
+    25
     (Vector.length results)
 
 testNoSelfDependent :: TestEff ()