From 8e82b4890073c63a71fab02c1767793a5e48b007 Mon Sep 17 00:00:00 2001 From: Heikki Hannikainen Date: Fri, 5 Aug 2016 23:24:56 +0300 Subject: [PATCH] test: remove debug warns --- tests/t/22qconstr-uplink.t | 7 ------- 1 file changed, 7 deletions(-) diff --git a/tests/t/22qconstr-uplink.t b/tests/t/22qconstr-uplink.t index abf8a66..864efd2 100644 --- a/tests/t/22qconstr-uplink.t +++ b/tests/t/22qconstr-uplink.t @@ -12,27 +12,20 @@ ok(1); # If we made it this far, we're ok. my $upstream_call = 'FAKEUP'; -warn "setting up first listener...\n"; my $iss1 = new Ham::APRS::IS_Fake('127.0.0.1:54153', $upstream_call); ok(defined $iss1, 1, "Test failed to initialize listening server socket (IPv4)"); -warn "binding and listen...\n"; $iss1->bind_and_listen(); -warn "running...\n"; my $p = new runproduct('uplinks'); ok(defined $p, 1, "Failed to initialize product runner"); ok($p->start(), 1, "Failed to start product"); -warn "started\n"; - my $login = "N5CAL-1"; my $server_call = "TESTING"; my $i_rx = new Ham::APRS::IS("127.0.0.1:55152", $login); ok(defined $i_rx, 1, "Failed to initialize Ham::APRS::IS"); -#warn "accepting\n"; - my $is1 = $iss1->accept(); ok(defined $is1, (1), "Failed to accept connection 1 from server"); ok($iss1->process_login($is1), 'ok', "Failed to accept login 1 from server");