diff options
| author | Jesse Luehrs <doy@tozt.net> | 2014-10-22 15:22:08 -0400 |
|---|---|---|
| committer | Jesse Luehrs <doy@tozt.net> | 2014-10-22 15:22:08 -0400 |
| commit | 75a24acdf9a7a7e72b2e2dff75f1ca36014c5b6a (patch) | |
| tree | 63b27d538fcfe0b538216eaad4fe0a46bcc52ddf | |
| parent | a920c76780625a777ef609c20d308753e41348ca (diff) | |
| download | Bot-Zulip-Chess-75a24acdf9a7a7e72b2e2dff75f1ca36014c5b6a.tar.gz Bot-Zulip-Chess-75a24acdf9a7a7e72b2e2dff75f1ca36014c5b6a.zip | |
reverse the order of the numbers
| -rw-r--r-- | lib/Bot/Zulip/Chess.pm | 2 |
1 files changed, 1 insertions, 1 deletions
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]; } |