Support starting from a nonstandard position.

[remoteglot] / Engine.pm

diff --git a/Engine.pm b/Engine.pm
index 4d05750e187546e301b27319766cb2a9e0ce6322..6ec914fb42c8bf7e98909d36e9c5a7aebf1fad4a 100644 (file)
--- a/Engine.pm
+++ b/Engine.pm
@@ -29,6 +29,7 @@ sub open {
                ev => $ev,
                cb => $cb,
                seen_uciok => 0,
+               stopping => 0,
        };
 
        print $uciwrite "uci\n";
@@ -46,7 +47,7 @@ sub _anyevent_handle_line {
 
        if (!$engine->{'seen_uciok'}) {
                # Gobble up lines until we see uciok.
-               if ($line =~ /^id (\S+) (.*)$/) {
+               if ($line =~ /^id (\S+) (.*?)\s*$/) {
                        $engine->{'id'}->{$1} = $2;
                } elsif ($line =~ /^uciok$/) {
                        $engine->{'seen_uciok'} = 1;