Unverified Commit 8bbe6661 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

HAFAS: pass message type to Message objects

parent 58fe3b8b
Loading
Loading
Loading
Loading
+2 −0
Original line number Diff line number Diff line
@@ -557,6 +557,7 @@ sub add_message {

	my $short = $json->{txtS};
	my $text  = $json->{txtN};
	my $type  = $json->{type};
	my $code  = $json->{code};
	my $prio  = $json->{prio};

@@ -581,6 +582,7 @@ sub add_message {
	my $message = Travel::Status::DE::HAFAS::Message->new(
		short     => $short,
		text      => $text,
		type      => $type,
		code      => $code,
		prio      => $prio,
		is_him    => $is_him,