X-Git-Url: https://git.sesse.net/?p=remoteglot;a=blobdiff_plain;f=remoteglot.pl;h=917a6a01300a145e4f537d9ab07394da01d16cea;hp=63cdac205d89a57e036e12b59d604212e0cbfbba;hb=ea605b127d018d0b3e4927826e48f7dd69944aaa;hpb=01b91aa7e25d94d3cc26db79271d8e6f05a60462 diff --git a/remoteglot.pl b/remoteglot.pl index 63cdac2..917a6a0 100755 --- a/remoteglot.pl +++ b/remoteglot.pl @@ -268,7 +268,7 @@ sub handle_pgn { } my $pgn = Chess::PGN::Parse->new(undef, $body); - if (!defined($pgn) || !$pgn->read_game()) { + if (!defined($pgn) || !$pgn->read_game() || $body !~ /^\[/) { warn "Error in parsing PGN from $url\n"; } else { eval {