diff --git a/demo/demo.erl b/demo/demo.erl
index cd3e386..3a393e4 100755
--- 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
index 88c9462..5bf6115 100755
--- 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) ->