X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FConfig.pm;h=a02072c65b78565895712f8d09ad554a9635f929;hb=1c4ce01f78b112c2247a08f1a0dc9efb5ab3adca;hp=e8453e4939c54d0dceec9dcc857a8bc93c8ad2bf;hpb=a2d0c09e87767baecc76442d11399b1c9ea17fe0;p=debbugs.git

diff --git a/Debbugs/Config.pm b/Debbugs/Config.pm
index e8453e4..a02072c 100644
--- a/Debbugs/Config.pm
+++ b/Debbugs/Config.pm
@@ -215,7 +215,7 @@ Domain where where usertags of packages belong; defaults to $gPackagePages
 
 =cut
 
-set_default(\%config,'usertag_package_domain',map {defined $_?s{https?://}{}:(); $_} $config{package_pages});
+set_default(\%config,'usertag_package_domain',map {my $a = $_; defined $a?$a =~ s{https?://}{}:(); $a} $config{package_pages});
 
 
 =item subscription_domain $gSubscriptionDomain