Fix compiler warnings in demo scripts

yrashk · Sep 12, 2011 · aa296c2 · aa296c2
1 parent bc58dfb
commit aa296c2
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 4 deletions.
diff --git a/demo/demo.erl b/demo/demo.erl
@@ -5,6 +5,10 @@
 -compile(export_all).
 -behaviour(gen_event).
 
+%% gen_event callbacks
+-export([init/1, handle_event/2, handle_call/2, handle_info/2,
+          terminate/2, code_change/3]).
+
 main(_) ->
     appmon:start(),
     application:start(sasl),
@@ -36,7 +40,7 @@ handle_event({message, Client, #msg{ content = Content } = Msg}, State) ->
     socketio_client:send(Client, #msg{ content = [{<<"echo">>, Content}], json = true}),
     {ok, State};
 
-handle_event(E, State) ->
+handle_event(_E, State) ->
     {ok, State}.
 
 handle_call(_, State) ->
@@ -45,7 +49,7 @@ handle_call(_, State) ->
 handle_info(_, State) ->
     {ok, State}.
 
-terminate(_Reason, State) ->
+terminate(_Reason, _State) ->
     ok.
 
 code_change(_OldVsn, State, _Extra) ->

diff --git a/demo/demo_ssl.erl b/demo/demo_ssl.erl
@@ -5,6 +5,10 @@
 -compile(export_all).
 -behaviour(gen_event).
 
+%% gen_event callbacks
+-export([init/1, handle_event/2, handle_call/2, handle_info/2,
+          terminate/2, code_change/3]).
+
 main(_) ->
     appmon:start(),
     application:start(sasl),
@@ -39,7 +43,7 @@ handle_event({message, Client, #msg{ content = Content } = Msg}, State) ->
     socketio_client:send(Client, #msg{ content = [{<<"echo">>, Content}], json = true}),
     {ok, State};
 
-handle_event(E, State) ->
+handle_event(_E, State) ->
     {ok, State}.
 
 handle_call(_, State) ->
@@ -48,7 +52,7 @@ handle_call(_, State) ->
 handle_info(_, State) ->
     {ok, State}.
 
-terminate(_Reason, State) ->
+terminate(_Reason, _State) ->
     ok.
 
 code_change(_OldVsn, State, _Extra) ->