daemon: introduce host_with_port for identifying sockets

[public-inbox.git] / t / httpd-corner.psgi

diff --git a/t/httpd-corner.psgi b/t/httpd-corner.psgi
index c3bf5231e209c9bc98edea0316183eefc9f58886..349b35dfb22d32df1096af54cba0f4001b19f7b0 100644 (file)
--- a/t/httpd-corner.psgi
+++ b/t/httpd-corner.psgi
@@ -44,6 +44,9 @@ my $app = sub {
                                $fh->close;
                        };
                }
+       } elsif ($path eq '/host-port') {
+               $code = 200;
+               push @$body, "$env->{REMOTE_ADDR}:$env->{REMOTE_PORT}";
        }
 
        [ $code, $h, $body ]