my $config = delete $conf->{config};
my @editable = ( qw/hostname config homepage/, grep { m{^\Q$config\E} } keys %$conf );
- client::conf( $ip, $_ => $param->{$_} ) foreach @editable;
+ my @update = grep { defined $param->{$_} } @editable;
+ if ( @update ) {
+ client::conf( $ip, $_ => $param->{$_} ) foreach @update;
+ print $client redirect("$url/client/$ip");
+ return;
+ }
my $nmap = qq|<a href=/nmap?scan=$ip>nmap</a>|;
my @table = (