summaryrefslogtreecommitdiff
path: root/lib/Travelynx/Model/Journeys.pm
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2022-12-27 22:22:34 +0100
committerDaniel Friesel <derf@finalrewind.org>2022-12-27 22:22:34 +0100
commit18bb069da35f04f83edeffd385212b841b6b03eb (patch)
tree87a57d896ec1755b36058488315ab50eedc7c69b /lib/Travelynx/Model/Journeys.pm
parent3fa9df942fc7371fde28b03c0de6b6e174d78e21 (diff)
review: fix percentage locale
Diffstat (limited to 'lib/Travelynx/Model/Journeys.pm')
-rwxr-xr-xlib/Travelynx/Model/Journeys.pm10
1 files changed, 2 insertions, 8 deletions
diff --git a/lib/Travelynx/Model/Journeys.pm b/lib/Travelynx/Model/Journeys.pm
index edaaf03..1adf95e 100755
--- a/lib/Travelynx/Model/Journeys.pm
+++ b/lib/Travelynx/Model/Journeys.pm
@@ -1375,18 +1375,12 @@ sub compute_review {
$review{top_trip_count} = $top_trip_count;
$review{top_trip_percent_h}
= sprintf( '%.1f%%', $top_trip_count * 100 / $stats->{num_trains} );
+ $review{top_trip_percent_h} =~ tr{.}{,};
$review{single_trip_count} = $single_trip_count;
$review{single_trip_percent_h}
= sprintf( '%.1f%%', $single_trip_count * 100 / $stats->{num_trains} );
-
- if ( @stops >= 3 ) {
- my $desc = q{};
- $review{typical_stops_3} = [ $stops[0][0], $stops[1][0], $stops[2][0] ];
- }
- elsif ( @stops == 2 ) {
- $review{typical_stops_2} = [ $stops[0][0], $stops[1][0] ];
- }
+ $review{single_trip_percent_h} =~ tr{.}{,};
return \%review;
}