// This command is only useful if you own an intermud channel

#include <lib.h>
#include <daemons.h>

inherit LIB_DAEMON;

mixed cmd(string chan) {

    if(!archp(previous_object())) return 0;
    if( !chan || chan == "") {
	return "Huh?";
    }
    if(member_array(chan,INTERMUD_D->GetChannels()) == -1) 
	return "No such channel.";

    else INTERMUD_D->eventWrite( ({ "channel-remove", 5, mud_name(), 
	    this_player()->GetKeyName(), INTERMUD_D->GetNameserver(), 
	    0, chan }) );

    //unguarded( (: update("/daemon/intermud") :) );
    load_object("/secure/cmds/creators/update")->cmd("/daemon/intermud");

    write("Channel removal request sent.");

    return 1;
}