From ea605b127d018d0b3e4927826e48f7dd69944aaa Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <sgunderson@bigfoot.com>
Date: Sun, 23 Nov 2014 14:44:28 +0100
Subject: [PATCH] Deal with strange PGN download failures.

---
 remoteglot.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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 {
-- 
2.39.2