Added instance DefaultFromField (T.SqlArray_ Nullable a) [Maybe b]

This should have been added when we did the Column -> Field conversion Addresses #558 (comment)
tomjaguarpaw · Sep 1, 2022 · 3a487cd · 3a487cd
1 parent 8ae110d
commit 3a487cd
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 0 deletions.
diff --git a/CHANGELOG.md b/CHANGELOG.md
@@ -1,3 +1,5 @@
+* Added `instance DefaultFromField (T.SqlArray_ Nullable a) [Maybe b]`
+
 * Changed `ascNullsFirst` and `descNullsLast` to work with nullable
  fields. This rectifies an oversight from the `Column` to `Field`
  change. This may technically be a PVP violation but I think the

diff --git a/src/Opaleye/Internal/RunQuery.hs b/src/Opaleye/Internal/RunQuery.hs
@@ -321,6 +321,10 @@ instance (Typeable b, DefaultFromField a b) =>
  DefaultFromField (T.SqlRange a) (PGSR.PGRange b) where
  defaultFromField = fromFieldRange defaultFromField
 
+instance (Typeable b, DefaultFromField a b) =>
+ DefaultFromField (T.SqlArray_ Nullable a) [Maybe b] where
+ defaultFromField = fromFieldArrayNullable defaultFromField
+
 fromFieldRange :: Typeable b
  => FromField a b
  -> FromField (T.SqlRange a) (PGSR.PGRange b)