fix part 1

This commit is contained in:
Elliott Pardee 2015-06-09 07:05:09 -04:00
parent 379a7fdc5c
commit 1f00b259ce

View File

@ -34,7 +34,6 @@ sub new
my $class = shift; my $class = shift;
my $character = my $character =
{ {
irc => "", # The player's irc nick, not found on the character sheet.
personal => personal =>
{ {
name => "", name => "",
@ -76,13 +75,6 @@ sub new
bless $character, $class; bless $character, $class;
} }
# Sets the player's irc nick:
sub set_irc
{
my $self = shift;
$self->{irc} = shift;
}
# Generates the 6 major stats: # Generates the 6 major stats:
sub generate_stats sub generate_stats
{ {