###
##	Original package IRCCS version 1, Copyright (c) 1995
##	Daniel J. Wightman.  Rewritten from Nov to Dec 2000.
##	Packaged Dec 19 and published as IRCCS (fruitbrick) version 2.
##
##	FruitBrick (IRCCS) - Internet Relay Chat Control System version 2
##	Copyright (C) 1995, 2000  Daniel J. Wightman <dent@abonica.net>
##
##	See the copyright or COPYRIGHT in the main program directory for
##	details.  See the LICENSE in the main program directory as well.
###
# 
# --------------------------------------------------------------------------
# RESUME - resume operserv activity
# --------------------------------------------------------------------------
# reverses suspend

{
# do they have auth? only admin gets this command
if($opers{$keynick}{rank} ne "admin")
	{
	$text = qq~
	You don't appear to have access to this setting. 
	You can gain access by authenticating as the admin.
	Only administrators can use this command.~;
	&sendtext($text, "\n", "\t");
	return;
	}

# passed
delete($opcoms{suspend});
&send(":$servnick NOTICE $nick :Done! The operator service is now open.\n");
# tell all opers
my($tempnick);
foreach $tempnick (keys %opers)
	{
	&send("NOTICE $tempnick :Admin $nicks{$keynick}{nick} has resumed $opernick access\n");
	}

}





