From 4f0d789e19187b75ca03c6b17eee84aece2e1f47 Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Sat, 19 Sep 2015 13:26:48 +0200
Subject: index: less confusing list for ambiguous names

---
 index.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/index.pl b/index.pl
index a4dea51..7a1fec7 100644
--- a/index.pl
+++ b/index.pl
@@ -276,7 +276,7 @@ sub handle_request {
 				input => $station,
 			);
 			my @candidates
-			  = map { [ "$_->{name} ($_->{id})", $_->{id} ] } $sf->results;
+			  = map { [ $_->{name}, $_->{id} ] } $sf->results;
 			if ( @candidates > 1
 				or ( @candidates == 1 and $candidates[0][1] ne $station ) )
 			{
@@ -289,7 +289,7 @@ sub handle_request {
 			}
 		}
 		if ( $backend eq 'iris' ) {
-			my @candidates = map { [ "$_->[1] ($_->[0])", $_->[0] ] }
+			my @candidates = map { [ $_->[1], $_->[0] ] }
 			  Travel::Status::DE::IRIS::Stations::get_station($station);
 			if ( @candidates > 1
 				or ( @candidates == 1 and $candidates[0][1] ne $station ) )
-- 
cgit v1.2.3