or die "svcpart required";
if ( $part_svc->has_router ) {
my $router = FS::router->new({
- map { $_ => $cgi->param("router_$_") }
+ map { $_ => scalar($cgi->param("router_$_")) }
qw( routernum routername blocknum )
});
- if (length($router->routername) == 0) {
+ if ($router->blocknum and length($router->routername) == 0) {
#sensible default
$router->set('routername', $svc->label);
}