/**
* Object ban command.
* @author Drakkos
* @started 28/12/2000
*
**/
#define INV_CHECK "/d/admin/obj/inv_check"
inherit "/cmds/base";
int cmd( string filename, string switch_on) {
switch (switch_on) {
case "ban":
INV_CHECK->ban_object (filename);
break;
case "unban":
INV_CHECK->unban_object (filename);
break;
default:
tell_object (this_player(), INV_CHECK->list_banned());
break;
}
return 1;
} /* cmd() */
mixed *query_patterns() {
return ({ "ban <string'filename'>", (: cmd( $4[0], "ban"):),
"unban <string'filename'>", (: cmd( $4[0], "unban" ):),
"list", (: cmd("", "list"):)});
} /* query_patterns() */