aers_rewrite/commit

Fix reloading of file into the right graph

authorCWI eculture 2
Thu Jan 31 13:45:04 2013 +0100
committerCWI eculture 2
Thu Jan 31 13:45:04 2013 +0100
commit1984e6c00c0947aea499b28a43c39e0e12b9f4ad
treed5039a44188febe38838303131e7a4456b3c251b
parente492aa41b6ad27490aeb34afb6192b2dc785e36b
Diff style: patch stat
diff --git a/config-available/aers_rewrite.pl b/config-available/aers_rewrite.pl
index dda83fa..7e835ff 100644
--- a/config-available/aers_rewrite.pl
+++ b/config-available/aers_rewrite.pl
@@ -11,3 +11,4 @@
 
 :- use_module(library(aers_rewrite)).
 :- use_module(library(ascii_rewrite)).
+:- use_module(library(ascii_simplify)).
diff --git a/lib/ascii_simplify.pl b/lib/ascii_simplify.pl
index 98c8ee8..b03f6e6 100644
--- a/lib/ascii_simplify.pl
+++ b/lib/ascii_simplify.pl
@@ -43,8 +43,11 @@ simplify :-
 	    atom_concat(Graph, '.ttl', RDF_FileName),
 	    absolute_file_name(ascii_rdf(RDF_FileName), RDF_File),
 	    absolute_file_name(ascii_simple_rdf(RDF_FileName), RDF_Simple_File),
-	    rdf_load(RDF_File),
+	    debug(simplify, 'load ~w into  ~w', [RDF_File, Graph]),
+	    rdf_load(RDF_File, [graph(Graph)]),
+	    debug(simplify, 'simplify ~w', [Graph]),
 	    simplify_graph(Graph),
+	    debug(simplify, 'save simplified graph to ~w', [RDF_Simple_File]),
 	    rdf_save_turtle(RDF_Simple_File, [graph(Graph)]),
 	    rdf_retractall(_,_,_,Graph),
 	    fail
@@ -52,7 +55,6 @@ simplify :-
 	).
 
 simplify_graph(Graph) :-
-	debug(simplify, 'simplify ~w', [Graph]),
 	rdf_rewrite(Graph).