From def1f8544765756d8286f883040bc1eea06b68b0 Mon Sep 17 00:00:00 2001 From: Darin McBride Date: Fri, 10 Jan 2014 20:32:17 -0700 Subject: [PATCH] Use commas in (potentially) big numbers for spy results. --- lib/Lacuna/DB/Result/Spies.pm | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/lib/Lacuna/DB/Result/Spies.pm b/lib/Lacuna/DB/Result/Spies.pm index 2f66a5204..cd8f58dd0 100644 --- a/lib/Lacuna/DB/Result/Spies.pm +++ b/lib/Lacuna/DB/Result/Spies.pm @@ -6,7 +6,7 @@ use utf8; no warnings qw(uninitialized); extends 'Lacuna::DB::Result'; use List::Util qw(shuffle); -use Lacuna::Util qw(format_date randint random_element); +use Lacuna::Util qw(format_date randint random_element commify); use DateTime; use Scalar::Util qw(weaken); @@ -1236,8 +1236,8 @@ sub sow_discontent { tags => ['Spies','Alert'], filename => 'created_disturbance.txt', params => [$self->on_body->name, - $amount, - $self->on_body->happiness, + commify($amount), + commify($self->on_body->happiness), $self->format_from], ); } @@ -1325,8 +1325,8 @@ sub hack_successful { tags => ['Spies','Alert'], filename => 'hack_successful.txt', params => [$self->on_body->name, - $amount, - $self->on_body->happiness, + commify($amount), + commify($self->on_body->happiness), $self->format_from], ); } @@ -1887,8 +1887,8 @@ sub uprising { $self->on_body->x, $self->on_body->y, $self->on_body->name, - $loss, - $self->on_body->happiness, + commify($loss), + commify($self->on_body->happiness), $self->format_from], ); $self->on_body->empire->send_predefined_message(