xmlrdf/commit
FIXED: Input handing, singleton
author | Chris Dijkshoorn |
---|---|
Mon Mar 17 16:31:13 2014 +0100 | |
committer | Jan Wielemaker |
Mon Mar 17 16:34:02 2014 +0100 | |
commit | f2d894c6053bf59461443254610c851e2c3a0e35 |
tree | 181703fd9fa287d4e6bd0c47cd4ba3a971fe4400 |
parent | b8f7d433a13126574126310ee14ca5d5005b73df |
Diff style: patch stat
diff --git a/lib/xmlrdf/xmlrdf.pl b/lib/xmlrdf/xmlrdf.pl index 43ddece..b15aff3 100644 --- a/lib/xmlrdf/xmlrdf.pl +++ b/lib/xmlrdf/xmlrdf.pl @@ -179,7 +179,7 @@ open_input(URL, In, Cleanup) :- open_input(URL, In, Cleanup) :- atom(URL), uri_components(URL, Data), - uri_data(scheme, Data, http), !, + uri_data(scheme, Data, Scheme), Scheme == http, !, http_open(URL, In, []), set_stream(In, file_name(URL)), Cleanup = close(In). @@ -263,9 +263,9 @@ xmldom_to_rdf(DOM, Options) :- element_uri(DOM, URI, Options), ( option(type(Type), Options) -> true - ; element_type(DOM, Type, Record), - rdf_assert(URI, rdf:type, Type, Graph) + ; element_type(DOM, Type, Record) ), + rdf_assert(URI, rdf:type, Type, Graph), set_properties(URI, DOM, Record). %% xmldom_rdf_properties(+URI, +DOM, +Options) is det.