X-Git-Url: http://aymargeddon.de/gitweb/?p=aymargeddon%2Fcurrent.git;a=blobdiff_plain;f=html%2Fplayer.epl;h=d954a1e66105ac6fee8ba1e42e35047263d2623d;hp=ccb534e0f19bdc2d6910b5d80f43e407d2bdeba7;hb=2f3eb0acd32f10bf160a94de786ce64b49c16f50;hpb=8f037c123df00f587fda88e656579bcf17c8e66b
diff --git a/html/player.epl b/html/player.epl
index ccb534e..d954a1e 100644
--- a/html/player.epl
+++ b/html/player.epl
@@ -7,7 +7,7 @@
$udat{-current} = 'player.epl';
use Aymargeddon;
- use Data::Dumper;
+ # use Data::Dumper;
$db = DataBase->new();
$id = 0;
if($udat{-id}){
@@ -27,7 +27,7 @@
($udat{-lang}) = $db->read_player($id,'LANGUAGE');
}
- $escmode = 0;
+ $escmode = 0;
# TODO: klappt nich :-(
# $out = '';
@@ -87,7 +87,7 @@
for $og (@$open_games){
push @real_open_games, $og unless exists $such{$og->[0]};
}
-
+ # Util::log("real open games: ". Dumper(\@real_open_games), 2);
($rn) = $db->read_player($id, 'REALNAME') unless exists $udat{-game};
-]
@@ -110,7 +110,7 @@
[+ $db->loc('PLAYER_OPENGAMES') +]:
[$ foreach $og (@real_open_games) $]
- [- $og=$og->[0]; ($og_name) = $db->read_game($og,'NAME'); -]
+ [- ($og_name) = $db->read_game($og,'NAME'); -]
[+$og_name+]
[$ endforeach $]
[$ if $#{@real_open_games} < 0 $]
@@ -140,7 +140,7 @@
$messages = $aym->read_messages();
$now = $db->now();
-]
- [+ $db->loc('PLAYER_MESSAGES_HEADING') +]
+ [+ $db->loc('PLAYER_MESSAGES_HEADING') +]
[+ $db->loc('PLAYER_DELETE_MESSAGES')+]
[$ foreach $msg (@$messages) $]