X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FConfig.pm;h=e262a34d981b7ac8d3f1d1d28c4ebe2b8e8a7333;hb=e938c2671eea5a0e0d4c8cdf00a18d5cf75f9911;hp=e8453e4939c54d0dceec9dcc857a8bc93c8ad2bf;hpb=0cb28b3934d58f605ca4e443f6d44390de773160;p=debbugs.git diff --git a/Debbugs/Config.pm b/Debbugs/Config.pm index e8453e4..e262a34 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?s{https?://}{}:(); $a} $config{package_pages}); =item subscription_domain $gSubscriptionDomain