annotation_service/commit

replace an by ann_ui namespace

diff --git a/lib/oa_annotation.pl b/lib/oa_annotation.pl
index c8c3de8..cd5896f 100644
--- a/lib/oa_annotation.pl
+++ b/lib/oa_annotation.pl
@@ -90,7 +90,7 @@ rdf_add_annotation(Options, Annotation) :-
 	(   option(type(Type), Options)
 	->  (  uri_is_global(Type)
 	    ->	QType = Type
-	    ;	QType = an:Type
+	    ;	QType = ann_ui:Type
 	    )
 	;   QType = oax:'Tag'
 	),
@@ -112,8 +112,8 @@ rdf_add_annotation(Options, Annotation) :-
 		     po(oa:hasTarget, Target),
 		     po(oa:hasBody, Body),
 		     po(dcterms:title, literal(Label)),
-		     po(an:annotationField, Field),
-		     po(an:typingTime, literal(type(xsd:integer, TT)))
+		     po(ann_ui:annotationField, Field),
+		     po(ann_ui:typingTime, literal(type(xsd:integer, TT)))
 		    ],
 	sort(KeyValue0, KeyValue),
 	rdf_global_term(KeyValue, Pairs),
@@ -136,7 +136,7 @@ rdf_get_annotation(Annotation, Props) :-
 
 rdf_get_annotation_by_tfa(Target, Field, Annotator, Graph, [annotation(Annotation)|Props]) :-
 	rdf(Annotation, oa:hasTarget, Target, Graph),
-	rdf(Annotation, an:annotationField, Field, Graph),
+	rdf(Annotation, ann_ui:annotationField, Field, Graph),
 	rdf_has_graph(Annotation, oa:annotator, Annotator, Graph),
 	get_annotation_properties(Annotation, Graph, Props).
 
diff --git a/lib/oa_schema.pl b/lib/oa_schema.pl
index 4142568..5543464 100644
--- a/lib/oa_schema.pl
+++ b/lib/oa_schema.pl
@@ -9,7 +9,7 @@ Prolog.
 */
 
 % Namespace for package-specific extensions:
-:- rdf_register_ns(an,  'http://semanticweb.cs.vu.nl/annotate/').
+:- rdf_register_ns(ann_ui,  'http://semanticweb.cs.vu.nl/annotate/ui/').
 
 % Namespace for old open annotation model:
 :- rdf_register_ns(oac, 'http://www.openannotation.org/ns/').