about summary refs log tree commit homepage
path: root/lib/PublicInbox/TestCommon.pm
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2023-10-17 23:38:05 +0000
committerEric Wong <e@80x24.org>2023-10-18 20:50:35 +0000
commitbb0ee9609077ca9e0c014af03fab91f57e4b9712 (patch)
treef264c8950b6cc991d2b8ae9cf98936a65f799c9e /lib/PublicInbox/TestCommon.pm
parent162afbf9845960d2030d4b44cc1f9f1ce24f375c (diff)
downloadpublic-inbox-bb0ee9609077ca9e0c014af03fab91f57e4b9712.tar.gz
v2:// lei outputs are on the filesystem, so putting $HOST:$PORT
is nonsensical.  We'll also keep `127.0.0.1' or `[::1]' since
it's harmless and can point out obvious errors in system
configuration when testing with old Perls or libraries.
Diffstat (limited to 'lib/PublicInbox/TestCommon.pm')
-rw-r--r--lib/PublicInbox/TestCommon.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/PublicInbox/TestCommon.pm b/lib/PublicInbox/TestCommon.pm
index 3839ab45..96663731 100644
--- a/lib/PublicInbox/TestCommon.pm
+++ b/lib/PublicInbox/TestCommon.pm
@@ -619,7 +619,7 @@ sub lei_ok (@) {
         my @msg = ref($_[0]) eq 'ARRAY' ? @{$_[0]} : @_;
         if (!$lei_loud) {
                 for (@msg) {
-                        s!\A([a-z0-9]+://)[^/]+/!$1\$HOST_PORT/!;
+                        s!(127\.0\.0\.1|\[::1\]):(?:\d+)!$1:\$PORT!g;
                         s!$tmpdir\b/(?:[^/]+/)?!\$TMPDIR/!g;
                         s!\Q$PWD\E\b!\$PWD!g;
                 }