Loading lib/Travelynx/Model/InTransit.pm +14 −1 Original line number Original line Diff line number Diff line Loading @@ -195,6 +195,7 @@ sub add { } } elsif ( $journey and $stop ) { elsif ( $journey and $stop ) { # DBRIS my $line; my $line; if ( $train_suffix if ( $train_suffix and $journey->number and $journey->number Loading @@ -203,7 +204,6 @@ sub add { $line = $train_suffix; $line = $train_suffix; } } # DBRIS my @route; my @route; for my $j_stop ( $journey->route ) { for my $j_stop ( $journey->route ) { push( push( Loading @@ -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( $db->insert( 'in_transit', 'in_transit', { { Loading Loading
lib/Travelynx/Model/InTransit.pm +14 −1 Original line number Original line Diff line number Diff line Loading @@ -195,6 +195,7 @@ sub add { } } elsif ( $journey and $stop ) { elsif ( $journey and $stop ) { # DBRIS my $line; my $line; if ( $train_suffix if ( $train_suffix and $journey->number and $journey->number Loading @@ -203,7 +204,6 @@ sub add { $line = $train_suffix; $line = $train_suffix; } } # DBRIS my @route; my @route; for my $j_stop ( $journey->route ) { for my $j_stop ( $journey->route ) { push( push( Loading @@ -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( $db->insert( 'in_transit', 'in_transit', { { Loading