bindings/erlang/collectd.erl: Use improved syntax for "dispatch_values".

[collectd.git] / bindings / erlang / collectd.erl

diff --git a/bindings/erlang/collectd.erl b/bindings/erlang/collectd.erl
index f4b31c6..1860a50 100644 (file)
--- a/bindings/erlang/collectd.erl
+++ b/bindings/erlang/collectd.erl
@@ -1,11 +1,14 @@
 -module(collectd).
--export([dispatch_values/1]).
+-export([dispatch_values/1, register_read/1]).
 
 -include("collectd.hrl").
 
-dispatch_values (VL) when is_record (VL, value_list) ->
+dispatch_values (#value_list{} = VL) ->
        call_cnode (dispatch_values, VL).
 
+register_read (Callback) ->
+       call_cnode (register_read, Callback).
+
 call_cnode(Func, Args) ->
        {any, 'collectd@leeloo.lan.home.verplant.org'} ! {Func, Args},
        receive