From 75a24acdf9a7a7e72b2e2dff75f1ca36014c5b6a Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Wed, 22 Oct 2014 15:22:08 -0400
Subject: reverse the order of the numbers

---
 lib/Bot/Zulip/Chess.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Bot/Zulip/Chess.pm b/lib/Bot/Zulip/Chess.pm
index eb9b749..0b85ece 100644
--- a/lib/Bot/Zulip/Chess.pm
+++ b/lib/Bot/Zulip/Chess.pm
@@ -227,7 +227,7 @@ sub format_board ($self) {
     my @board = split "\n", $board;
     my $n = 1;
     for my $i (0..$#board) {
-        my $prefix = $i % 2 == 1 && $i < 16 ? $n++ : " ";
+        my $prefix = $i % 2 == 1 && $i < 16 ? (9 - $n++) : " ";
         $board[$i] = $prefix . $board[$i];
     }
 
-- 
cgit v1.2.3