X-Git-Url: https://git.sesse.net/?p=remoteglot;a=blobdiff_plain;f=Board.pm;h=2950e359c57b4a8fa7ac8632a24a2a730417488a;hp=8573bd8f29814e7cdce82555332b4eda3dc612b0;hb=28a48a41e4722d937261926c0a07530a53fa4200;hpb=81935352427e8812bda89c856be7ee3ce36f3eb8

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;