From 51b55e3cc98946baf5c60cd4fcfd1e127023e0d0 Mon Sep 17 00:00:00 2001
From: Robin Redeker <elmex@ta-sa.org>
Date: Mon, 18 Jul 2011 13:53:22 +0200
Subject: [PATCH] code: remove some debugging output from server UI stuff.

---
 lib/Games/Construder/Server/UI.pm | 6 ------
 1 file changed, 6 deletions(-)

diff --git a/lib/Games/Construder/Server/UI.pm b/lib/Games/Construder/Server/UI.pm
index bce0657..7b0313f 100644
--- a/lib/Games/Construder/Server/UI.pm
+++ b/lib/Games/Construder/Server/UI.pm
@@ -249,8 +249,6 @@ sub commands {
 sub handle_command {
    my ($self, $cmd, $arg, $pos) = @_;
 
-   warn "CMD @_\n";
-
    if ($cmd =~ /slot_(\d+)/) {
       $self->{pl}->{data}->{slots}->{selected} = $1;
       $self->show;
@@ -492,7 +490,6 @@ sub layout {
       my $wself = $self;
       weaken $wself;
       $self->{bio_intake} = $bio_usage;
-      warn "BIO INTKE @$bio_usage\n";
       $self->{bio_intake_tmr} = AE::timer 2, 0, sub {
          delete $wself->{bio_intake};
          $wself->show;
@@ -927,8 +924,6 @@ sub handle_command {
 sub layout {
    my ($self, $type, $ent) = @_;
 
-   warn "LAYOUT MATVIEW $type | $ent\n";
-
    $self->{invid} = $type;
    my ($type, $invid) = $self->{pl}->{inv}->split_invid ($type);
    my ($inv_cnt) = $self->{pl}->{inv}->get_count ($invid);
@@ -1887,7 +1882,6 @@ sub handle_command {
 
 sub layout {
    my ($self, $pos, $entity) = @_;
-   warn "LAYOUt PSTOR $entity\n";
    $self->{pat_stor} = [$pos, $entity] if $pos;
    ($pos, $entity) = @{$self->{pat_stor}};