-
- $pid = spawn([@cmd, 'update-server-info'], undef, undef);
- defined $pid or die "spawn update-server-info failed: $!\n";
- waitpid($pid, 0) == $pid or die 'update-server-info did not finish';
- $? == 0 or die "failed to update-server-info: $?\n";
+ if ($nchg) {
+ $pid = spawn([@cmd, 'update-server-info'], undef, undef);
+ defined $pid or die "spawn update-server-info failed: $!\n";
+ waitpid($pid, 0) == $pid or
+ die 'update-server-info did not finish';
+ $? == 0 or die "failed to update-server-info: $?\n";
+ }