X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Flei_external.t;h=51d0af5c6333e52d436ed6722791e5bfab229857;hb=refs%2Fheads%2Fmaster;hp=78f71658529745a99b41d6bc3ef379d2ea49ca90;hpb=9eb840de546dfe9b6c6aa1588f5bb8c0153c7d71;p=public-inbox.git

diff --git a/t/lei_external.t b/t/lei_external.t
index 78f71658..51d0af5c 100644
--- a/t/lei_external.t
+++ b/t/lei_external.t
@@ -17,6 +17,7 @@ is($canon->('/this//path/'), '/this/path', 'extra slashes gone');
 is($canon->('/ALL/CAPS'), '/ALL/CAPS', 'caps preserved');
 
 my $glob2re = $cls->can('glob2re');
+is($glob2re->('http://[::1]:1234/foo/'), undef, 'IPv6 URL not globbed');
 is($glob2re->('foo'), undef, 'plain string unchanged');
 is_deeply($glob2re->('[f-o]'), '[f-o]' , 'range accepted');
 is_deeply($glob2re->('*'), '[^/]*?' , 'wildcard accepted');