amalgame/commit

get rid of 020-ag_prefixes.pl

authorJacco van Ossenbruggen
Wed Jan 30 21:16:20 2013 +0100
committerJacco van Ossenbruggen
Wed Jan 30 21:16:20 2013 +0100
commit75231d50bf7e9110c97da26977707c10d240a566
tree2b555f39cc36a650c8d143d68d767e5972306f95
parent477582b45f78213c2dfd3f1e23713c4a9c1dde71
Diff style: patch stat
diff --git a/config-available/020-ag_prefixes.pl b/config-available/020-ag_prefixes.pl
deleted file mode 100644
index f2159eb..0000000
--- a/config-available/020-ag_prefixes.pl
+++ /dev/null
@@ -1,20 +0,0 @@
-:- module(amalgame_ns, []).
-:- use_module(library(semweb/rdf_db)).
-
-% Register namespaces we use in amalgame's Prolog source code here.
-% Namespaces only used in the data should be registered through their VOID files.
-% Also note that many common namespaces have been defined already by
-% Prolog or ClioPatria.
-
-% Namespaces from third parties we use/reuse:
-:- rdf_register_ns(edm,	 'http://www.europeana.eu/schemas/edm/').
-
-% Namespaces we declared ourselves:
-% :- rdf_register_ns(amalgame,   'http://purl.org/vocabularies/amalgame#').
-:- rdf_register_ns(evaluator,  'http://purl.org/vocabularies/amalgame/evaluator#').
-
-% Namespaces that are not used in the code but have no obvious location
-% in the data tree... This should be moved to somewhere else in the
-% end.  FIXME
-
-:- rdf_register_ns(vulod,      'http://semanticweb.cs.vu.nl/lod/').
diff --git a/config-available/DEFAULTS b/config-available/DEFAULTS
index 448da8f..56f50a3 100644
--- a/config-available/DEFAULTS
+++ b/config-available/DEFAULTS
@@ -1,4 +1,3 @@
-config('020-ag_prefixes', link).
 config('025-amalgame', link).
 config(ag_data, link).
 config(ag_lod, link).
diff --git a/lib/amalgame/util.pl b/lib/amalgame/util.pl
index 0a57dbe..acd5316 100644
--- a/lib/amalgame/util.pl
+++ b/lib/amalgame/util.pl
@@ -242,7 +242,7 @@ xsd_timestamp(Time, Atom) :-
                     Date, posix).
 
 is_edm_collection(EDM) :-
-	once(rdf(_,edm:country, _, EDM:_)).
+	once(rdf(_,'http://www.europeana.eu/schemas/edm/country', _, EDM:_)).
 
 is_edm_collection(EDM) :-
 	findall(Target-Graph-Class, is_edm_collection_(Target, Graph, Class), Results0),
@@ -257,7 +257,7 @@ is_edm_collection(EDM) :-
 	member(EDM-_-_, Results).
 
 is_edm_collection_(EDM, Graph, Class) :-
-	rdf_equal(Class,  edm:'Agent'),
+	rdf_equal(Class,  'http://www.europeana.eu/schemas/edm/Agent'),
 	rdfs_individual_of(Agent, Class),
 	rdf(Agent, rdf:type, _, Graph:_),
 	atom_concat(Graph, '_Agent', EDM).