From: Steinar H. Gunderson <sgunderson@bigfoot.com>
Date: Sat, 23 Jan 2016 12:44:01 +0000 (+0100)
Subject: Make castling O-O instead of 0-0, as per FEN standard.
X-Git-Url: https://git.sesse.net/?p=remoteglot;a=commitdiff_plain;h=28a48a41e4722d937261926c0a07530a53fa4200

Make castling O-O instead of 0-0, as per FEN standard.
---

diff --git a/Board.pm b/Board.pm
index 8573bd8..2950e35 100644
--- a/Board.pm
+++ b/Board.pm
@@ -514,22 +514,22 @@ sub _prettyprint_move_no_check_or_mate {
 
 	# white short castling
 	if ($move eq 'e1g1' && $piece eq 'K') {
-		return '0-0';
+		return 'O-O';
 	}
 
 	# white long castling
 	if ($move eq 'e1c1' && $piece eq 'K') {
-		return '0-0-0';
+		return 'O-O-O';
 	}
 
 	# black short castling
 	if ($move eq 'e8g8' && $piece eq 'k') {
-		return '0-0';
+		return 'O-O';
 	}
 
 	# black long castling
 	if ($move eq 'e8c8' && $piece eq 'k') {
-		return '0-0-0';
+		return 'O-O-O';
 	}
 
 	my $pretty;