amalgame/commit

REFACT: phase out voc_property

authorJacco van Ossenbruggen
Mon Sep 15 09:19:07 2014 +0200
committerJacco van Ossenbruggen
Mon Sep 15 09:19:07 2014 +0200
commit39a1375128a98c159084944f1ea3834d5e432370
tree337d27fd8c5b736a80ff463cf10c3c6be31e4252
parent580f4f2b62af3082fd16460c2b94830f010eae7a
Diff style: patch stat
diff --git a/api/strategy_viz.pl b/api/strategy_viz.pl
index a260529..98d8cd1 100644
--- a/api/strategy_viz.pl
+++ b/api/strategy_viz.pl
@@ -11,7 +11,6 @@
 :- use_module(components(label)).
 :- use_module(components(graphviz)).
 :- use_module(library(skos/util)).
-:- use_module(library(amalgame/voc_stats)).
 :- use_module(library(amalgame/ag_strategy)).
 :- use_module(library(amalgame/ag_stats)).
 :- use_module(library(amalgame/ag_evaluation)).
@@ -216,9 +215,10 @@ amalgame_label(Strategy, Resource, Lang, MaxLen, Label) :-
 	;   atomic_list_concat([Label0, '\n'|Stats], Label)
 	).
 
-stats_label_list(_Strategy, Resource, [Count]) :-
+stats_label_list(Strategy, Resource, [Count]) :-
 	skos_is_vocabulary(Resource),
-	voc_property(Resource, totalCount(Count), [compute(false)]),
+	node_stats(Strategy, Resource, Stats, [compute(false)]),
+	option(totalCount(Count), Stats),
 	!.
 stats_label_list(Strategy, Resource, [ConceptStats]) :-
 	node_stats(Strategy, Resource, Stats, [compute(false)]),