/* -*- LPC -*- */
/*
* $Locker: $
* $Id: unsuspend.c,v 1.1 2001/03/12 05:08:14 ceres Exp $
* $Log: unsuspend.c,v $
* Revision 1.1 2001/03/12 05:08:14 ceres
* Initial revision
*
* Revision 1.1 1998/12/29 06:03:35 ceres
* Initial revision
*
* Revision 1.1 1998/01/06 05:29:21 ceres
* Initial revision
*
*/
#include <parser.h>
#include <access.h>
inherit "/cmds/base";
mixed cmd(string str) {
if (this_player() != this_player(1))
return 0;
if (!"/secure/master"->query_lord(geteuid(previous_object())) &&
!"/d/liaison/master"->query_deputy(geteuid(previous_object())))
return notify_fail("You must be a lord or liaison deputy to unsuspend "
"someone.");
notify_fail("We failed!\n");
if (!"/secure/bastards"->unsuspend_person(str))
return 0;
write(str+" unsuspended.\n");
return 1;
} /* cmd() */
int help() {
return notify_fail("Syntax: unsuspend <name>.\n");
}
mixed *query_patterns() {
return ({ "<string>", (: cmd($4[0]) :), });
} /* query_patterns() */
