X-Git-Url: http://aymargeddon.de/gitweb/?p=aymargeddon%2Fcurrent.git;a=blobdiff_plain;f=src%2FAymargeddon.pm;h=c137c42253456e78513ee5a2f96f146808fadd63;hp=7b932466ab460ea4990f1152f72d24eb8459b5a6;hb=HEAD;hpb=f67c6dd32094e525b54a599e96416fa1d701296a

diff --git a/src/Aymargeddon.pm b/src/Aymargeddon.pm
index 7b93246..c137c42 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);
 
@@ -47,9 +47,10 @@ sub new{
 
 sub get_map{
   my $self = shift;
-
+  
   unless (exists $self->{-map}){
-    $self->{-map} = $self->read_map("TERRAIN,HOME,OCCUPANT,TEMPLE,PLAGUE,HOME");
+      #TODO: HOME dupplication correct?
+      $self->{-map} = $self->read_map("TERRAIN,HOME,OCCUPANT,TEMPLE,PLAGUE,HOME");
   }
   return $self->{-map};
 }