From d44cca5812da5785958dd8b78c986424a3a5cd10 Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Mon, 20 Oct 2014 09:45:51 +0200
Subject: add api_version field

---
 index.pl | 18 +++++++++++++-----
 1 file changed, 13 insertions(+), 5 deletions(-)

(limited to 'index.pl')

diff --git a/index.pl b/index.pl
index 9d2ead2..f3593e0 100644
--- a/index.pl
+++ b/index.pl
@@ -64,6 +64,11 @@ sub handle_request {
 	my $backend        = $self->param('backend')      // 'ris';
 	my $callback       = $self->param('callback');
 
+	my $api_version
+	  = $backend eq 'iris'
+	  ? $Travel::Status::DE::IRIS::VERSION
+	  : $Travel::Status::DE::DeutscheBahn::VERSION;
+
 	$self->stash( departures => [] );
 	$self->stash( title      => 'db-fakedisplay' );
 	$self->stash( version    => $VERSION );
@@ -87,17 +92,19 @@ sub handle_request {
 			  Travel::Status::DE::IRIS::Stations::get_station($station);
 			$json = $self->render_to_string(
 				json => {
-					version    => $VERSION,
-					error      => 'ambiguous station code/name',
-					candidates => \@candidates,
+					api_version => $api_version,
+					version     => $VERSION,
+					error       => 'ambiguous station code/name',
+					candidates  => \@candidates,
 				}
 			);
 		}
 		else {
 			$json = $self->render_to_string(
 				json => {
-					version => $VERSION,
-					error   => 'unknown station code/name',
+					api_version => $api_version,
+					version     => $VERSION,
+					error       => 'unknown station code/name',
 				}
 			);
 		}
@@ -235,6 +242,7 @@ sub handle_request {
 	if ( $template eq 'json' ) {
 		my $json = $self->render_to_string(
 			json => {
+				api_version  => $api_version,
 				preformatted => \@departures,
 				version      => $VERSION,
 				raw          => \@results,
-- 
cgit v1.2.3