cluster_search/commit

Changed ui to INVENiT demo.

diff --git a/lib/cluster_search/web_ui.pl b/lib/cluster_search/web_ui.pl
index 84f80fb..d872e7b 100644
--- a/lib/cluster_search/web_ui.pl
+++ b/lib/cluster_search/web_ui.pl
@@ -27,16 +27,19 @@ The ui variables are retrieved from rdf (e.g. rdf/rijksmuseum_ui.ttl).
 :- use_module(library(http/http_open)).
 :- use_module(library('http/http_dispatch')).
 :- use_module(library(semweb/rdf_db)).
+:- use_module(library('semweb/rdf_library')).
 :- use_module(library(cluster_search/settings)).
 :- use_module(cliopatria(components/label)).
 :- use_module(library(cluster_search/search_statistics)).
 
-:- rdf_load(rdf('rijksmuseum_ui.ttl')). % load ui config file
-:- set_setting_default(search:ui, rui:rijksmuseumUI).
+:- set_setting_default(search:ui, bui:birdUI).
 :- set_setting_default(thumbnail:thumbnail_size, size(350,300)).
 :- set_setting_default(thumbnail:medium_size, size(1280,1024)).
 :- set_setting_default(search:image_filter, all).
 
+% load rdf info ui
+:- rdf_load_library('bird-search-ui').
+
 %%	web(+Request) is det.
 %
 %	If query is given, generate results page, fron page otherwise.
@@ -267,10 +270,12 @@ ssl_verify(_SSL, _ProblemCertificate, _AllCertificates, _FirstCertificate, _Erro
 %
 %	Replies the title for the given page.
 title(front, _) -->
-    {rdf(rui:rijksmuseumUI, dcterms:title, literal(lang(en, Title)))},
+    {setting(search:ui, UI),
+    rdf(UI, dcterms:title, literal(lang(en, Title)))},
     html(title(Title)).
 title(about, _) -->
-    {rdf(rui:rijksmuseumUI, dcterms:title, literal(lang(en, Title))),
+    {setting(search:ui, UI),
+    rdf(UI, dcterms:title, literal(lang(en, Title))),
     concat('About ', Title, TitleAbout)
     },
     html(title(TitleAbout)).
@@ -282,7 +287,8 @@ title(result, Options) -->
     html(title(Title)).
 
 title(analytics, _) -->
-    {rdf(rui:rijksmuseumUI, dcterms:title, literal(lang(en, Title))),
+    {setting(search:ui, UI),
+    rdf(UI, dcterms:title, literal(lang(en, Title))),
     concat(Title, ' Statistics', TitleStatistics)},
     html(title(TitleStatistics)).
 
diff --git a/rdf/bird_ui.ttl b/rdf/bird_ui.ttl
new file mode 100644
index 0000000..b5814a9
--- /dev/null
+++ b/rdf/bird_ui.ttl
@@ -0,0 +1,28 @@
+@prefix ui:     <http://semanticweb.cs.vu.nl/clustersearch/ui/> .
+@prefix bui:    <http://semanticweb.cs.vu.nl/clustersearch/bird#> .
+@prefix rdf:    <http://www.w3.org/1999/02/22-rdf-syntax-ns#> .
+@prefix rdfs:   <http://www.w3.org/2000/01/rdf-schema#> .
+@prefix dcterms:	<http://purl.org/dc/terms/> .
+@prefix skos:   <http://www.w3.org/2004/02/skos/core#> .
+
+bui:birdUI a ui:clusterSearchUI ;
+	dcterms:title "INVENiT"@en ;
+	ui:iconLocation "signpainter.png" .
+	
+bui:carouselSnipe a ui:carouselItem ;
+	dcterms:title "Search for Snipe"@en ;
+	ui:imageLocation "carousel/snipe.jpg" ;
+	ui:action "search?query=snipe" ;
+	ui:elementOf bui:birdsUI .
+
+bui:carouselSongbird a ui:carouselItem ;
+	dcterms:title "Search for song birds"@en ;
+	ui:imageLocation "carousel/songbird.jpg" ;
+	ui:action "search?query=song-birds" ;
+	ui:elementOf bui:birdsUI .
+	
+bui:carouselHondecoeter a ui:carouselItem ;
+	dcterms:title "Search for Hondecoeter"@en ;
+	ui:imageLocation "carousel/hondecoeter.jpg" ;
+	ui:action "search?query=hondecoeter" ;
+	ui:elementOf bui:birdsUI .
diff --git a/rdf/void.ttl b/rdf/void.ttl
index e0914d7..64eba6a 100644
--- a/rdf/void.ttl
+++ b/rdf/void.ttl
@@ -12,6 +12,10 @@
   vann:preferredNamespaceUri "http://semanticweb.cs.vu.nl/clustersearch/rijks#"
 ] .
 
+[ vann:preferredNamespacePrefix "bui" ;
+  vann:preferredNamespaceUri "http://semanticweb.cs.vu.nl/clustersearch/bird#"
+] .
+
 [ vann:preferredNamespacePrefix "sws" ;
   vann:preferredNamespaceUri "http://semanticweb.cs.vu.nl/clustersearch/schema/"
 ] .
@@ -26,6 +30,11 @@
 	dcterms:title "Cluster Search UI configuration ui instance for the Rijksmuseum collection";
 	void:dataDump <rijksmuseum_ui.ttl> .
 	
+<bird-search-ui>
+	a void:Dataset ;
+	dcterms:title "Cluster Search UI configuration ui instance for the bird demo";
+	void:dataDump <bird_ui.ttl> .
+	
 <cluster-search-schema>
 	a void:Dataset ;
 	dcterms:title "Schema for cluster search (at the moment adding a inverse property for oa:hasTarget";
diff --git a/web/img/carousel/hondecoeter.jpg b/web/img/carousel/hondecoeter.jpg
new file mode 100644
index 0000000..d2ba47a
Binary files /dev/null and b/web/img/carousel/hondecoeter.jpg differ
diff --git a/web/img/carousel/snipe.jpg b/web/img/carousel/snipe.jpg
new file mode 100644
index 0000000..281f37e
Binary files /dev/null and b/web/img/carousel/snipe.jpg differ
diff --git a/web/img/carousel/songbird.jpg b/web/img/carousel/songbird.jpg
new file mode 100644
index 0000000..4af0148
Binary files /dev/null and b/web/img/carousel/songbird.jpg differ