int     do_info()
{
    mixed * arr;

    arr = (mixed *)SKILL_OB->query_skills();
    write( our_guild->long() + "\nSkill costs if you join this guild.\n" );
	    printf( "%-*'='s\n", this_player()->query_cols(),
		    "======SKILLS=======Cur/Max==For Next" );
	    printf( "%#*-s\n", this_player()->query_cols(), rec_cost( arr, "", 1, our_guild ) );
	    printf( "%*'='|s\n", this_player()->query_cols(), "> You have " +
		    this_player()->query_xp() + " points to spend <" );

/**************
    arr = (mixed *)this_player()->query_skills();
    printf( "%-*'='s\n", this_player()->query_cols(),
	    "======SKILLS=======Cur/Max==For Next" );
    printf( "%#*-s\n", this_player()->query_cols(), rec_cost( arr, "", 1,
							      our_guild ) );
    printf( "%*'='|s\n", this_player()->query_cols(), "> You have " +
	    this_player()->query_xp() + " points to spend <" );
*************/
    return 1;
}				/* do_info() */