Throw an error if an exception happens on value mapping.

zotonic · Dec 7, 2021 · 3751c80 · 3751c80
1 parent 009537e
commit 3751c80
Showing 1 changed file with 8 additions and 2 deletions.
diff --git a/src/rdf_triples.erl b/src/rdf_triples.erl
@@ -37,8 +37,14 @@ compact(Doc, Namespaces) ->
                 Acc#{ <<"@type">> => ns_compact(V, Namespaces)};
             (K, V, Acc) ->
                 K1 = ns_compact(K, Namespaces),
-                V1 = compact_value(V, Namespaces),
-                Acc#{ K1 => V1 }
+                try
+                    V1 = compact_value(V, Namespaces),
+                    Acc#{ K1 => V1 }
+                catch
+                    _:_ ->
+                        Uri = maps:get(<<"@id">>, Doc, undefined),
+                        erlang:throw({illegal_triple_value, {Uri, K, V}})
+                end
         end,
         #{},
         Doc).