Permalink
Browse files

Use commas in (potentially) big numbers for spy results.

  • Loading branch information...
1 parent 850fb88 commit def1f8544765756d8286f883040bc1eea06b68b0 @dmcbride dmcbride committed with lemming552 Jan 11, 2014
Showing with 7 additions and 7 deletions.
  1. +7 −7 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(

0 comments on commit def1f85

Please sign in to comment.