test: always set ip for FusionInventory::Agent::HTTP::Server

Fixes test failing under Strawberry Perl 5.32
fusioninventory · Nov 16, 2020 · c694f55 · c694f55
1 parent 371bb73
commit c694f55
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/t/agent/http/server.t b/t/agent/http/server.t
@@ -28,6 +28,7 @@ my $server;
 lives_ok {
     $server = FusionInventory::Agent::HTTP::Server->new(
         agent     => FusionInventory::Test::Agent->new(),
+        ip        => '127.0.0.1',
         logger    => $logger,
         htmldir   => 'share/html'
     );
@@ -51,6 +52,7 @@ if (my $pid = fork()) {
 lives_ok {
     $server = FusionInventory::Agent::HTTP::Server->new(
         agent     => FusionInventory::Test::Agent->new(),
+        ip        => '127.0.0.1',
         logger    => $logger,
         htmldir   => 'share/html',
         trust     => [ '127.0.0.1', '192.168.0.0/24' ]
@@ -70,6 +72,7 @@ ok (
 lives_ok {
     $server = FusionInventory::Agent::HTTP::Server->new(
         agent     => FusionInventory::Test::Agent->new(),
+        ip        => '127.0.0.1',
         logger    => $logger,
         htmldir   => 'share/html',
         trust     => [ '127.0.0.1', 'localhost', 'th1sIsNowh3re' ]
@@ -92,6 +95,7 @@ my $port = FusionInventory::Agent::Tools::first { test_port($_) } 8080 .. 8180;
 lives_ok {
     $server = FusionInventory::Agent::HTTP::Server->new(
         agent     => FusionInventory::Test::Agent->new(),
+        ip        => '127.0.0.1',
         logger    => $logger,
         port      => $port,
         htmldir   => 'share/html',