summaryrefslogtreecommitdiff
path: root/lib/Travelynx/Model
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Travelynx/Model')
-rwxr-xr-xlib/Travelynx/Model/Journeys.pm19
1 files changed, 17 insertions, 2 deletions
diff --git a/lib/Travelynx/Model/Journeys.pm b/lib/Travelynx/Model/Journeys.pm
index e09ca7d..e6659e2 100755
--- a/lib/Travelynx/Model/Journeys.pm
+++ b/lib/Travelynx/Model/Journeys.pm
@@ -703,7 +703,7 @@ sub get_latest_checkout_station_id {
return $res_h->{checkout_station_id};
}
-sub get_years {
+sub get_nav_years {
my ( $self, %opt ) = @_;
my $uid = $opt{uid};
@@ -723,6 +723,22 @@ sub get_years {
return @ret;
}
+sub get_years {
+ my ( $self, %opt ) = @_;
+
+ my @years = $self->get_nav_years(%opt);
+
+ for my $year (@years) {
+ my $stats = $self->stats_cache->get(
+ uid => $opt{uid},
+ year => $year,
+ month => 0,
+ );
+ $year->[2] = $stats // {};
+ }
+ return @years;
+}
+
sub get_months_for_year {
my ( $self, %opt ) = @_;
@@ -748,7 +764,6 @@ sub get_months_for_year {
for my $row ( $res->hashes->each ) {
if ( $row->{year} == $year ) {
- # TODO delegate query to the (not yet present) JourneyStats model
my $stats = $self->stats_cache->get(
db => $db,
uid => $uid,