return if ($engine->{'stopping'} && $line !~ /^bestmove/);
$engine->{'stopping'} = 0;
- if ($line =~ /^info/) {
+ if ($line =~ /^info/ && $line !~ / cluster /) {
my (@infos) = split / /, $line;
shift @infos;
}
if (exists($pos_calculating->{'history'}) &&
- defined($remoteglotconf::json_history_dir)) {
+ defined($remoteglotconf::json_history_dir) && defined($json->{'engine'}{name})) {
my $id = id_for_pos($pos_calculating);
my $filename = $remoteglotconf::json_history_dir . "/" . $id . ".json";