/* mailinfo command, trial out by Turrican for a commands daemon. */ inherit COMMAND_BASE; /** @ignore yes */ int cmd( string str ) { if( !str || str == "") { write("You have "+ lower_case( MAIL_H->finger_mail( TP->query_name() ) ) ); return 1; } str = TP->expand_nickname(str); if( !PLAYER_H->test_user(str) ) { write("Sorry, but "+CAP(str)+" isn't a player.\n"); return 1; } write( CAP(str)+" has "+lower_case( MAIL_H->finger_mail(str) ) ); return 1; } /* cmd() */ /** @ignore yes */ mixed query_patterns() { return ({ "", (: cmd(0) :), "<word'player'>", (: cmd($4[0]) :), }); } /* query_patterns() */