From 955ec8788840b465f3d98ee0ef017a859fadefa8 Mon Sep 17 00:00:00 2001
From: Andrii Chebukin <XperiAndri@Outlook.com>
Date: Wed, 18 Oct 2023 19:17:31 +0400
Subject: [PATCH] Fixed `coerceUriInput` definition to use the common error
 creation

---
 src/FSharp.Data.GraphQL.Shared/SchemaDefinitions.fs | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/src/FSharp.Data.GraphQL.Shared/SchemaDefinitions.fs b/src/FSharp.Data.GraphQL.Shared/SchemaDefinitions.fs
index 131247d29..b08cb4f70 100644
--- a/src/FSharp.Data.GraphQL.Shared/SchemaDefinitions.fs
+++ b/src/FSharp.Data.GraphQL.Shared/SchemaDefinitions.fs
@@ -294,17 +294,18 @@ module SchemaDefinitions =
 
     /// Tries to resolve AST query input to URI.
     let coerceUriInput =
+        let destinationType = "URI"
         function
         | Variable e when e.ValueKind = JsonValueKind.String ->
             match Uri.TryCreate(e.GetString(), UriKind.RelativeOrAbsolute) with
             | true, uri -> Ok uri
-            | false, _ -> Error [{ new IGQLError with member _.Message = $"Cannot deserialize '{e.GetRawText()}' into URI" }]
-        | Variable e -> e.GetDeserializeError "URI"
+            | false, _ -> e.GetDeserializeError destinationType
+        | Variable e -> e.GetDeserializeError destinationType
         | InlineConstant (StringValue s) ->
             match Uri.TryCreate(s, UriKind.RelativeOrAbsolute) with
             | true, uri -> Ok uri
-            | false, _ -> Error [{ new IGQLError with member _.Message = $"Cannot parse '{s}' into URI" }]
-        | InlineConstant value -> value.GetCoerceError "URI"
+            | false, _ -> getParseError destinationType s
+        | InlineConstant value -> value.GetCoerceError destinationType
 
     /// Tries to resolve AST query input to DateTimeOffset.
     let coerceDateTimeOffsetInput =