diff options
author | Birte Kristina Friesel <derf@finalrewind.org> | 2024-04-27 10:49:48 +0200 |
---|---|---|
committer | Birte Kristina Friesel <derf@finalrewind.org> | 2024-04-27 10:49:48 +0200 |
commit | 80139a3a3166ee8cd8bfbed4f67e1bdca03cfa81 (patch) | |
tree | 3cd1464d6832a0d539389c80c9c464df2fa0f924 /bin | |
parent | 5859764fbf3b2bb63edc1d4cbb1a501441ea33f3 (diff) |
Make origins return a list of hashrefs, just like destinations
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/db-wagenreihung | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/bin/db-wagenreihung b/bin/db-wagenreihung index 87b5223..291cc9f 100755 --- a/bin/db-wagenreihung +++ b/bin/db-wagenreihung @@ -73,7 +73,12 @@ my $wr = Travel::Status::DE::DBWagenreihung->new( printf( "%s: %s → %s\n", join( ' / ', map { $wr->train_type . ' ' . $_ } $wr->train_numbers ), - join( ' / ', $wr->origins ), + join( + ' / ', + map { + sprintf( '%s (%s)', $_->{name}, join( q{}, @{ $_->{sections} } ) ) + } $wr->origins + ), join( ' / ', map { |