sub base_url { # for coderepos, PSGI-only
my ($self, $env) = @_; # env - PSGI env
sub base_url { # for coderepos, PSGI-only
my ($self, $env) = @_; # env - PSGI env
my $url = host_prefix_url($env, '');
# for mount in Plack::Builder
$url .= '/' if substr($url, -1, 1) ne '/';
my $url = host_prefix_url($env, '');
# for mount in Plack::Builder
$url .= '/' if substr($url, -1, 1) ne '/';
- return map { host_prefix_url($env, $_) } @$urls;
+ map { host_prefix_url($env, $_) } @$urls;
+ } else {
+ (base_url($self, $env) // '???');