From 28ef543265cccadbdd4f7c91f01c961bc04c4f59 Mon Sep 17 00:00:00 2001
From: Jeena Paradies <spam@jeenaparadies.net>
Date: Tue, 26 Apr 2011 14:13:45 +0200
Subject: [PATCH] moved stats to protocol for message

---
 src/ggs_player.erl   | 1 -
 src/ggs_protocol.erl | 2 ++
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/ggs_player.erl b/src/ggs_player.erl
index a9c898b..2e07527 100644
--- a/src/ggs_player.erl
+++ b/src/ggs_player.erl
@@ -111,7 +111,6 @@ handle_cast({srv_cmd, "define", _Headers, Data}, #state { table = Table } = Stat
     {noreply, State};
 
 handle_cast({game_cmd, Command, _Headers, Data}, #state { table = Table } = State) ->
-    ggs_stats:message(),
     ggs_table:notify(Table, self(), {game, Command, Data}),
     {noreply, State};
 
diff --git a/src/ggs_protocol.erl b/src/ggs_protocol.erl
index 92b7362..a0f68a3 100644
--- a/src/ggs_protocol.erl
+++ b/src/ggs_protocol.erl
@@ -43,6 +43,7 @@ create_message({Command, Data}) ->
 %% Assemble a message which can b
 %e used as a reply to a client
 create_message(Cmd, Enc, Acc, Data) ->
+    ggs_stats:message(),
     Length = integer_to_list(string:len(Data)),
     Msg =   "Client-Command: " ++ Cmd ++ "\n" ++
             "Client-Encoding: " ++ Enc ++ "\n" ++
@@ -109,6 +110,7 @@ code_change(_OldVsn, State, _Extra) ->
 
 
 prettify(Args, Data) ->
+    ggs_stats:message(),
     case lists:keyfind("Server-Command", 1, Args) of
         {_, Value} ->
             {srv_cmd, Value, Args, Data};