amalgame/commit

FIX: try to fix the broken old change publish_ns code

authorJacco van Ossenbruggen
Tue Nov 30 13:11:12 2021 +0100
committerJacco van Ossenbruggen
Tue Nov 30 13:11:12 2021 +0100
commit76c7977a47b68c3c032507a30aaf691be7b4e635
treea775eb98cdfe5c43fe3841aefb88e955c4f76617
parent1bf5f753e80cbb9b8535fdfc9c02547616fcfcee
Diff style: patch stat
diff --git a/api/ag_process.pl b/api/ag_process.pl
index eec1475..e7ad7ba 100644
--- a/api/ag_process.pl
+++ b/api/ag_process.pl
@@ -177,10 +177,9 @@ change_namespace(Old, New, Strategy, NewStrategy) :-
 	forall(member(T, OResults), fix_o_ns(T, Old, New)),
 
 	% fix graphs
-	rdf_transaction(forall(rdf(S,P,O,Strategy),
-			       rdf_update(S,P,O,graph(NewStrategy))
-			      )
-		       ).
+	rdf_transaction(rdf_cp_graph(Strategy, NewStrategy, false)),
+	rdf_unload_graph(Strategy).
+
 
 tainted_s_ns(S,P,O,Old,Strategy) :-
 	rdf(S,P,O,Strategy),
@@ -188,7 +187,7 @@ tainted_s_ns(S,P,O,Old,Strategy) :-
 
 tainted_o_ns(S,P,O,Old,Strategy) :-
 	rdf(S,P,O,Strategy),
-	rdf_is_object(O),
+	atom(O),
 	sub_atom(O, 0,_,_,Old).