From: Steinar H. Gunderson <sgunderson@bigfoot.com>
Date: Mon, 10 Nov 2014 20:10:51 +0000 (+0100)
Subject: Uppercase promotion choices correctly.
X-Git-Url: https://git.sesse.net/?p=remoteglot;a=commitdiff_plain;h=735425d12830b76de9fd60247267380424902d3b;ds=sidebyside

Uppercase promotion choices correctly.
---

diff --git a/Board.pm b/Board.pm
index f20cecf..a867c74 100644
--- 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;