Fix castling display when looking down PVs.

[remoteglot] / remoteglot.pl

diff --git a/remoteglot.pl b/remoteglot.pl
index 765802833b054b9270d75c86d8db13f19f8cb047..9301ac7939d25796dbf6407d36741e9b7a6a0029 100755 (executable)
--- a/remoteglot.pl
+++ b/remoteglot.pl
@@ -349,6 +349,10 @@ sub style12_to_pos {
        $pos{'black_castle_k'} = $x[13];
        $pos{'black_castle_q'} = $x[14];
        $pos{'time_to_100move_rule'} = $x[15];
+       $pos{'player_w'} = $x[17];
+       $pos{'player_b'} = $x[18];
+       $pos{'player_w'} =~ s/^[IG]M//;
+       $pos{'player_b'} =~ s/^[IG]M//;
        $pos{'move_num'} = $x[26];
        if ($x[27] =~ /([a-h][1-8])-([a-h][1-8])/) {
                $pos{'last_move_uci'} = $1 . $2;
@@ -756,9 +760,9 @@ sub output_screen {
                }
                if (exists($info->{'tbhits'}) && $info->{'tbhits'} > 0) {
                        if ($info->{'tbhits'} == 1) {
-                               $text .= ", one Nalimov hit";
+                               $text .= ", one Syzygy hit";
                        } else {
-                               $text .= sprintf ", %u Nalimov hits", $info->{'tbhits'};
+                               $text .= sprintf ", %u Syzygy hits", $info->{'tbhits'};
                        }
                }
                $text .= "\n\n";