X-Git-Url: http://aymargeddon.de/gitweb/?p=aymargeddon%2Fcurrent.git;a=blobdiff_plain;f=src%2FAymargeddon.pm;h=e4fa7d178be8b3de1eb727ee45c60702d6916a6b;hp=7b932466ab460ea4990f1152f72d24eb8459b5a6;hb=448ecd81168816b51bf23219e8cc802ed4e2346e;hpb=15cca89f315f0affe5562877f462f2fa7dcdb853 diff --git a/src/Aymargeddon.pm b/src/Aymargeddon.pm index 7b93246..e4fa7d1 100644 --- a/src/Aymargeddon.pm +++ b/src/Aymargeddon.pm @@ -38,7 +38,7 @@ use Data::Dumper; @Aymargeddon::ISA = qw(Game); sub new{ - my ($class,$game,$user,$db,$lang) = @_; + my ($class,$game,$user,$db,$lang) = @_; #TODO: $lang not used here? my $self = Game->new($game,$user,$db); @@ -49,6 +49,7 @@ sub get_map{ my $self = shift; unless (exists $self->{-map}){ + # TODO: HOME dupplication correct? $self->{-map} = $self->read_map("TERRAIN,HOME,OCCUPANT,TEMPLE,PLAGUE,HOME"); } return $self->{-map};