From d78b37bc98dab30939397ba59e2b1fdcb374caf2 Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Mon, 2 Nov 2015 17:08:49 +0100 Subject: Add button (not working) see m.b. KmeFcoKeyList --- src/rose.erl | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'src/rose.erl') diff --git a/src/rose.erl b/src/rose.erl index 18b661a..0870e72 100644 --- a/src/rose.erl +++ b/src/rose.erl @@ -21,6 +21,8 @@ invoke(Op, {ok, Data}) -> dispatch({invoke, #'Invoke'{invokeId = Id, opcode = Op, argument = Data}}) -> counter:set(Id), case Op of + ?BUTTON -> + ok; ?EVENT -> {ok, Event} = event:decode(Data), io:format("Event: ~p~n", [Event]), @@ -54,6 +56,9 @@ dispatch({reject, #'Reject'{invokeId = Id, problem = Problem}}) -> dispatch(#'ReturnResult_result'{opcode = Op, result = Data}) -> case Op of + ?BUTTON -> + {ok, List} = button:decode(Data), + io:format("List: ~p~n", [List]); ?MONITOR -> {ok, Status} = monitor:decode(Data), io:format("Result: ~p~n", [Status]); -- cgit v1.2.3