Now we have a /lusers command in chat ;)

games/GGSChat/chat.py

@@ -29,8 +29,6 @@ class GGSChat:
             , "on_chatBox_focus" : lambda x, y: self.wTree.get_widget("entry").grab_focus()
             }
 
-        for i in range(0,9):
-            dic
         self.wTree.signal_autoconnect(dic)
 
         self.wTree.get_widget("nickBox").set_text(getpass.getuser())
@@ -43,8 +41,15 @@ class GGSChat:
     def chat(self):
         exp = self.wTree.get_widget("entry").get_text()
         nick = self.wTree.get_widget("nickBox").get_text()
-        exp = "<%s> %s" % (nick, exp)
-        self.s.send("Game-Command: chat\n"+
+        if exp[0] == "/":
+            self.s.send("Game-Command: %s\n" % exp[1:] +
+                "Token: %s\n" % self.token +
+                "Content-Type: text\n" +
+                "Content-Length: 0\n"+
+                "\n")
+        else:
+            exp = "<%s> %s" % (nick, exp)
+            self.s.send("Game-Command: chat\n"+
                 "Token: %s\n" % self.token +
                 "Content-Type: text\n"+
                 "Content-Length: %s\n" % (len(exp))+

src/ggs_gamevm_e.erl

@@ -50,7 +50,9 @@ do_stuff(Command, Args, Player, Table) ->
         "uname" ->
             Uname = os:cmd("uname -a"),
             ggs_player:notify(Player, server, Uname);
-
+        "lusers" ->
+           {ok, Players} = ggs_table:get_player_list(Table),
+           ggs_player:notify(Player, server,io_lib:format("~p\n",[Players]));
         Other ->
             ggs_player:notify(Player, server, "I don't know that command..\n")
     end.

src/ggs_table.erl

@@ -6,7 +6,7 @@
 %% gen_server callbacks
 -export([init/1, handle_call/3, handle_cast/2, handle_info/2,
          terminate/2, code_change/3, notify_all_players/2, notify_game/3,
-         add_player/2]).
+         add_player/2, get_player_list/1]).
 
 -record(state, { token, players, socket, game_vm } ).
 
@@ -39,6 +39,10 @@ add_player(Table, Player) ->
 remove_player(Table, Player) ->
 	call(Table, {remove_player, Player}).
 
+%% @doc Get a list of all player processes attached to this table
+get_player_list(Table) ->
+    gen_server:call(Table, get_player_list).
+
 % @doc stops the table process
 stop(Table) ->
     gen_server:cast(Table, stop).