/* -*- LPC -*- */ /* * $Locker: $ * $Id: mks_enior.c,v 1.2 2003/03/21 01:59:43 ceres Exp $ * $Log: mks_enior.c,v $ * Revision 1.2 2003/03/21 01:59:43 ceres * Modified to use player handler * * Revision 1.1 1998/01/06 05:29:21 ceres * Initial revision * */ #include <parser.h> #include <player_handler.h> inherit "/cmds/base"; /* * This will make a creator a senior. */ mixed cmd(string creator) { seteuid("Root"); if ( !PLAYER_HANDLER->test_user( creator ) || !"/secure/master"->query_lord( previous_object( -1 ) ) ) return notify_fail("You must be a lord to create a senior creator.\n"); if("/secure/master"->add_senior(creator)) { write(creator + " promoted to senior.\n"); return 1; } else return notify_fail("Call to add_senior failed.\n"); } /* cmd() */ mixed *query_patterns() { return ({ "<string>", (: cmd($4[0]) :), }); } /* query_patterns() */