From: Daniel Kahn Gillmor Date: Tue, 12 Oct 2010 07:45:29 +0000 (-0400) Subject: cleanup debug info X-Git-Tag: msva-perl_debian/0.5-1~1^2~2 X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=04d23094fcbea21746aed192f45b5730e291e051;p=monkeysphere-validation-agent.git cleanup debug info --- diff --git a/Crypt/Monkeysphere/MSVA.pm b/Crypt/Monkeysphere/MSVA.pm index 72c7167..e620a4c 100755 --- a/Crypt/Monkeysphere/MSVA.pm +++ b/Crypt/Monkeysphere/MSVA.pm @@ -649,13 +649,13 @@ my $socketcount = @{ $server->{server}->{sock} }; if ( $socketcount != 1 ) { - msvalog('error', "%d sockets open; should have been 1.", $socketcount); + msvalog('error', "%d sockets open; should have been 1.\n", $socketcount); $server->set_exit_status(10); $server->server_close(); } my $port = @{ $server->{server}->{sock} }[0]->sockport(); if ((! defined $port) || ($port < 1) || ($port >= 65536)) { - msvalog('error', "got nonsense port: %d.", $port); + msvalog('error', "got nonsense port: %d.\n", $port); $server->set_exit_status(11); $server->server_close(); }