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

backend selection: handle backends that are no longer supported

parent 78d44943

lib/Travelynx/Controller/Account.pm

+9 −3
Original line number Diff line number Diff line
@@ -1012,13 +1012,19 @@ sub backend_form { 
			$backend->{name} = 'DB';

		}

		elsif ( $backend->{hafas} ) {

			if ( my $s = $self->hafas->get_service( $backend->{name} ) ) {

				$type = 'HAFAS';

			$backend->{longname}

			  = $self->hafas->get_service( $backend->{name} )->{name};

				$backend->{longname} = $s->{name};

			}

			else {

				$type = undef;

			}

		}

		$backend->{type} = $type;

	}



	@backends = grep { $_->{type} } @backends;



	$self->render(

		'select_backend',

		backends    => \@backends,