Revert "Avoid recreating all metrics on reload"
This reverts commit ab8d36b3973364b3a87f90767b9fadab016ac38b.
diff --git a/src/couch_stats_aggregator.erl b/src/couch_stats_aggregator.erl
index 64e7fa9..456af76 100644
--- a/src/couch_stats_aggregator.erl
+++ b/src/couch_stats_aggregator.erl
@@ -79,14 +79,10 @@
code_change(_OldVsn, State, _Extra) ->
{ok, State}.
-props_to_type({Name, Props}) ->
- {Name, proplists:get_value(type, Props)}.
-
reload_metrics() ->
- Current = lists:map(fun props_to_type/1, load_metrics_for_applications()),
+ Current = load_metrics_for_applications(),
CurrentSet = sets:from_list(Current),
- Existing = lists:map(fun props_to_type/1, couch_stats:list()),
- ExistingSet = sets:from_list(Existing),
+ ExistingSet = sets:from_list(couch_stats:list()),
ToDelete = sets:subtract(ExistingSet, CurrentSet),
ToCreate = sets:subtract(CurrentSet, ExistingSet),
sets:fold(
@@ -95,7 +91,8 @@
ToDelete
),
sets:fold(
- fun({Name, Type}, _) ->
+ fun({Name, Props}, _) ->
+ Type = proplists:get_value(type, Props),
couch_stats:new(Type, Name),
nil
end,