amalgame/commit

FIXED: make html_vocab_rows robust against missing properties key in stats dict

authorJacco van Ossenbruggen
Fri Mar 6 13:08:05 2015 +0100
committerJacco van Ossenbruggen
Fri Mar 6 13:08:05 2015 +0100
commited8cd8eef97a6b251a7903d012ebd19ed512b297
tree8847af6245a0afc3ca472b389791029bf762d32f
parentfc3fc71d20ac5f346e642901ec524230536a539b
Diff style: patch stat
diff --git a/components/amalgame/startpage.pl b/components/amalgame/startpage.pl
index 1302acf..ebb8438 100644
--- a/components/amalgame/startpage.pl
+++ b/components/amalgame/startpage.pl
@@ -203,16 +203,21 @@ html_vocab_head -->
 
 html_vocab_rows([]) --> !.
 html_vocab_rows([Scheme|Vs]) --> {
+    (	Scheme == 'http://purl.org/vocabularies/princeton/wn30/'
+    ->	gtrace
+    ;	true
+    ),
+
     (	node_stats(_Strategy, Scheme, Stats, [compute(false)])
     ->	option(totalCount(ConceptCount), Stats),
-	option(properties(PDict), Stats),
+	option(properties(PDict), Stats, pdict{}),
 	rdf_equal(skos:prefLabel, PL),
 	rdf_equal(skos:altLabel, AL),
 	(   get_dict(PL, PDict, PrefLangs)-> true; PrefLangs = []),
 	(   get_dict(AL, PDict, AltLangs)-> true;   AltLangs = []),
 	option(version(Version0), Stats),
 	(   Version0 == ''
-	->  option(revision(Version), Stats)
+	->  option(revision(Version), Stats, '')
 	;   Version = Version0
 	)
     ;   rdf_estimate_complexity(_, skos:inScheme, Scheme, ConceptCount),
@@ -232,7 +237,9 @@ html_vocab_rows([Scheme|Vs]) --> {
 	]),
 	html_vocab_rows(Vs).
 
-
+html_vocab_rows([Scheme|Vs]) -->
+	html(tr(td(['error: ', Scheme]))),
+	html_vocab_rows(Vs).
 
 
 %%	html_strategy_table(+Graphs, +Options)