/* -*- LPC -*- */ /* * $Locker: $ * $Id: groups.c,v 1.4 2001/02/01 17:30:43 pinkfish Exp $ * * $Log: groups.c,v $ * Revision 1.4 2001/02/01 17:30:43 pinkfish * Fix up some bugs. * * Revision 1.3 1999/06/21 09:15:11 tape * Made it patch directly into "group list". * * Revision 1.2 1999/06/20 09:34:54 taffyd * Temporarily patched for new groups system. * * Revision 1.1 1998/07/13 03:42:54 pinkfish * Initial revision * */ #include <group_handler.h> inherit "/cmds/base"; mixed cmd(string str, string pattern) { return GROUP_CMD->group_command_control( "list", "", "", "", ({ str }), pattern ); } /* cmd() */ mixed *query_patterns() { return ({ "", (: cmd("", "list") :), "[with] <string'player'>", (: cmd($4[0], "list [with] <string'player'>") :) }); } /* query_patterns() */