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

Formation/Group.pm: perltidy

parent 23cd71fc

lib/Travel/Status/DE/DBRIS/Formation/Group.pm

+13 −9
Original line number Diff line number Diff line
@@ -585,13 +585,17 @@ sub parse_model { 
			elsif ( $carriage->model == 429 or $carriage->model == 829 ) {

				$ml{'429'}++;

			}

			elsif ( substr( $carriage->uic_id, 5, 4 ) eq '1430' or substr( $carriage->uic_id, 5, 4 ) eq '1830' ) {

			elsif (substr( $carriage->uic_id, 5, 4 ) eq '1430'

				or substr( $carriage->uic_id, 5, 4 ) eq '1830' )

			{

				$ml{'1430'}++;

			}

			elsif ( $carriage->model == 430 or $carriage->model == 431 ) {

				$ml{'430'}++;

			}

			elsif (substr( $carriage->uic_id, 5, 4 ) eq '1440' or substr( $carriage->uic_id, 5, 4 ) eq '1441' ) {

			elsif (substr( $carriage->uic_id, 5, 4 ) eq '1440'

				or substr( $carriage->uic_id, 5, 4 ) eq '1441' )

			{

				$ml{'1440'}++;

			}

			elsif ($carriage->model == 440