match freenode subdomains when checking irc link

metacpan · Oct 2, 2014 · ef5d02b · ef5d02b
1 parent 8a18a8c
commit ef5d02b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/MetaCPAN/Web/Role/ReleaseInfo.pm b/lib/MetaCPAN/Web/Role/ReleaseInfo.pm
@@ -169,7 +169,7 @@ sub groom_irc {
             $channel =~ s/^(?![#~!+])/#/;
             $channel = uri_escape($channel);
 
-            if ( $host eq 'freenode.net' ) {
+            if ( $host =~ /(?:^|\.)freenode\.net$/ ) {
                 $irc_info->{web}
                     = "https://webchat.freenode.net/?randomnick=1&prompt=1&channels=${channel}";
             }