diff options
| author | Birte Kristina Friesel <derf@finalrewind.org> | 2025-10-29 20:18:58 +0100 |
|---|---|---|
| committer | Birte Kristina Friesel <derf@finalrewind.org> | 2025-10-29 20:18:58 +0100 |
| commit | 138dd87ab950f03fac193def46fdba7b0f5063fa (patch) | |
| tree | 7dfb73e96e55ec83a3eb60b4c44f380299872a24 /lib/Travelynx/Model/Stations.pm | |
| parent | ec60d908029688ea92948d9ef8b3e1a4d0529000 (diff) | |
Incorporate dbdb into travelynx
Diffstat (limited to 'lib/Travelynx/Model/Stations.pm')
| -rw-r--r-- | lib/Travelynx/Model/Stations.pm | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/lib/Travelynx/Model/Stations.pm b/lib/Travelynx/Model/Stations.pm index 5316118..6c647ec 100644 --- a/lib/Travelynx/Model/Stations.pm +++ b/lib/Travelynx/Model/Stations.pm @@ -519,4 +519,19 @@ sub grep_unknown { return @unknown_stations; } +sub get_bahn_stationinfo { + my ( $self, %opt ) = @_; + $opt{db} //= $self->{pg}->db; + + my $res + = $opt{db} + ->select( 'bahn_platform_directions', ['data'], { eva => $opt{eva} } ) + ->expand->hash; + + if ($res) { + return $res->{data}; + } + return; +} + 1; |