--- deliantra/server/ext/tcp.ext	2010/03/16 20:37:54	1.15
+++ deliantra/server/ext/tcp.ext	2010/04/29 07:32:34	1.16
@@ -12,13 +12,13 @@
 
 for (@$BIND) {
    my ($host, $port) = @$_;
-   warn "listening on ", (format_hostport $host, $port), "\n";
+   cf::info "listening on ", (format_hostport $host, $port), "\n";
 
    push @LISTENERS, tcp_server $host, $port, sub {
       my ($fh, $host, $port) = @_
          or return;
 
-      warn "new connection from ", (format_hostport $host, $port), "\n";
+      cf::info "new connection from ", (format_hostport $host, $port), "\n";
 
       cf::client::create fileno $fh, $host;
    };