summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBirte Kristina Friesel <derf@finalrewind.org>2025-04-16 20:38:31 +0200
committerBirte Kristina Friesel <derf@finalrewind.org>2025-04-16 20:38:31 +0200
commit51b0080bcf939139554bbb730445fb2572d0f26e (patch)
tree2327c0a60470d598bc8200501cd062b7fdaf3250
parente605ed389de964e6fc0f494f732b607a5ff6bdc6 (diff)
dbris: store him messages upon checkin as well2.11.19
-rw-r--r--lib/Travelynx/Model/InTransit.pm15
1 files changed, 14 insertions, 1 deletions
diff --git a/lib/Travelynx/Model/InTransit.pm b/lib/Travelynx/Model/InTransit.pm
index e8495b8..0215cb8 100644
--- a/lib/Travelynx/Model/InTransit.pm
+++ b/lib/Travelynx/Model/InTransit.pm
@@ -195,6 +195,7 @@ sub add {
}
elsif ( $journey and $stop ) {
+ # DBRIS
my $line;
if ( $train_suffix
and $journey->number
@@ -203,7 +204,6 @@ sub add {
$line = $train_suffix;
}
- # DBRIS
my @route;
for my $j_stop ( $journey->route ) {
push(
@@ -229,6 +229,19 @@ sub add {
]
);
}
+ my @messages;
+ for my $msg ( $journey->messages ) {
+ if ( not $msg->{ueberschrift} ) {
+ push(
+ @{ $data->{him_msg} },
+ {
+ header => q{},
+ prio => $msg->{prioritaet},
+ lead => $msg->{text}
+ }
+ );
+ }
+ }
$db->insert(
'in_transit',
{