Unverified Commit 51b0080b authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

dbris: store him messages upon checkin as well

parent e605ed38
Loading
Loading
Loading
Loading
+14 −1
Original line number Diff line number Diff line
@@ -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',
			{