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 Original line Diff line number Diff line
@@ -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
@@ -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(
@@ -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',
			{
			{