Uppercase promotion choices correctly.
authorSteinar H. Gunderson <sgunderson@bigfoot.com>
Mon, 10 Nov 2014 20:10:51 +0000 (21:10 +0100)
committerSteinar H. Gunderson <sgunderson@bigfoot.com>
Mon, 10 Nov 2014 20:10:51 +0000 (21:10 +0100)
Board.pm

index f20cecf..a867c74 100644 (file)
--- a/Board.pm
+++ b/Board.pm
@@ -467,7 +467,7 @@ sub _prettyprint_move_no_check_or_mate {
                        if (defined($promo) && $promo ne '') {
                                # promotion
                                $pretty .= "=";
-                               $pretty .= $promo;
+                               $pretty .= uc($promo);
                        }
                }
                return $pretty;