melville/
melville/cmds/
melville/cmds/admin/
melville/data/
melville/data/mail/
melville/data/player/
melville/data/system/
melville/data/user/
melville/doc/functions/
melville/doc/help/
melville/inherit/
melville/log/
melville/obj/
melville/system/auto/
melville/system/player/
melville/system/user/
melville/users/
melville/users/mobydick/
melville/world/
/* The who command. Kinda bare-bones right now. */

#include <config.h>

int do_command() {

    string foo ;
    string *names ;

    write ("The following users are logged on: \n") ;
    names = USERS_D->query_user_names() ;
    foo = implode(names,", ") ;
    write (foo+"\n") ;
    return 1 ;
}