From b41a3523b369d178d3be23357ae9951e700cd821 Mon Sep 17 00:00:00 2001
From: Birte Kristina Friesel <derf@finalrewind.org>
Date: Wed, 27 Dec 2023 12:33:48 +0100
Subject: remove legacy map search / intersection views

---
 lib/DBInfoscreen.pm                |  4 ---
 lib/DBInfoscreen/Controller/Map.pm | 74 --------------------------------------
 2 files changed, 78 deletions(-)

(limited to 'lib')

diff --git a/lib/DBInfoscreen.pm b/lib/DBInfoscreen.pm
index b55f0d7..9dcc2d0 100644
--- a/lib/DBInfoscreen.pm
+++ b/lib/DBInfoscreen.pm
@@ -328,14 +328,10 @@ sub startup {
 
 	$r->get('/_ajax_mapinfo/:tripid/:lineno')->to('map#ajax_route');
 	$r->get('/map/:tripid/:lineno')->to('map#route');
-	$r->get('/intersection/:trips')->to('map#intersection');
 	$r->get( '/z/:train/*station' => 'train_at_station' )
 	  ->to('stationboard#station_train_details');
 	$r->get( '/z/:train' => 'train' )->to('stationboard#train_details');
 
-	$r->get('/map')->to('map#search_form');
-	$r->get('/_trainsearch')->to('map#search');
-
 	$self->defaults( layout => 'app' );
 
 	$r->get('/')->to('stationboard#handle_request');
diff --git a/lib/DBInfoscreen/Controller/Map.pm b/lib/DBInfoscreen/Controller/Map.pm
index 9fb1e0e..e552a18 100644
--- a/lib/DBInfoscreen/Controller/Map.pm
+++ b/lib/DBInfoscreen/Controller/Map.pm
@@ -509,78 +509,4 @@ sub ajax_route {
 	)->wait;
 }
 
-sub search {
-	my ($self) = @_;
-
-	my $t1 = $self->param('train1');
-	my $t2 = $self->param('train2');
-
-	my $t1_data;
-	my $t2_data;
-
-	my @requests;
-
-	if ( not( $t1 and $t1 =~ m{^\S+\s+\d+$} )
-		or ( $t2 and not $t2 =~ m{^\S+\s+\d+$} ) )
-	{
-		$self->render(
-			'trainsearch',
-			title     => 'Fahrtverlauf',
-			hide_opts => 1,
-			error     => $t1
-			? "Züge müssen im Format 'Zugtyp Nummer' angegeben werden, z.B. 'RE 1234'"
-			: undef,
-		);
-		return;
-	}
-
-	$self->render_later;
-
-	push( @requests, $self->hafas->trainsearch_p( train_no => $t1 ) );
-
-	if ($t2) {
-		push( @requests, $self->hafas->trainsearch_p( train_no => $t2 ) );
-	}
-
-	Mojo::Promise->all(@requests)->then(
-		sub {
-			my ( $t1_data, $t2_data ) = @_;
-
-			if ($t2_data) {
-				$self->redirect_to(
-					sprintf(
-						"/intersection/%s,0;%s,0",
-						$t1_data->[0]{trip_id},
-						$t2_data->[0]{trip_id},
-					)
-				);
-			}
-			else {
-				$self->redirect_to(
-					sprintf( "/map/%s/0", $t1_data->[0]{trip_id}, ) );
-			}
-		}
-	)->catch(
-		sub {
-			my ($err) = @_;
-			$self->render(
-				'trainsearch',
-				title     => 'Fahrtverlauf',
-				hide_opts => 1,
-				error     => $err
-			);
-		}
-	)->wait;
-}
-
-sub search_form {
-	my ($self) = @_;
-
-	$self->render(
-		'trainsearch',
-		title     => 'Fahrtverlauf',
-		hide_opts => 1,
-	);
-}
-
 1;
-- 
cgit v1.2.3