From: Steinar H. Gunderson Date: Thu, 13 Nov 2014 23:55:17 +0000 (+0100) Subject: Handle slightly unstandard PGN promotion syntax. X-Git-Url: https://git.sesse.net/?p=remoteglot;a=commitdiff_plain;h=f14762ad5ddf5881777f5861b19960784d224c71 Handle slightly unstandard PGN promotion syntax. --- diff --git a/Board.pm b/Board.pm index a867c74..655b7f1 100644 --- a/Board.pm +++ b/Board.pm @@ -170,7 +170,7 @@ sub parse_pretty_move { # Parse promo my $promo; - if ($move =~ s/=([QRNB])$//) { + if ($move =~ s/=?([QRNB])$//) { $promo = $1; }