From 43cf9da87b82548055c13dd68873441c64b0850c Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Sun, 4 Oct 2015 22:51:42 +0200
Subject: index: do not show parameters with default values

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

(limited to 'index.pl')

diff --git a/index.pl b/index.pl
index 9d2c142..bfa5031 100644
--- a/index.pl
+++ b/index.pl
@@ -16,6 +16,12 @@ our $VERSION = qx{git describe --dirty} || '0.05';
 
 my $refresh_interval = 180;
 
+my %default = (
+	backend => 'iris',
+	mode    => 'clean',
+	admode  => 'deparr',
+);
+
 sub log_api_access {
 	my $counter = 1;
 	if ( -r $ENV{DBFAKEDISPLAY_STATS} ) {
@@ -754,8 +760,13 @@ get '/_redirect' => sub {
 	$params->remove('station');
 	$params->remove('via');
 
-	for my $param (qw(platforms)) {
-		if ( not $params->param($param) ) {
+	for my $param (qw(platforms backend mode admode)) {
+		if (
+			not $params->param($param)
+			or ( exists $default{$param}
+				and $params->param($param) eq $default{$param} )
+		  )
+		{
 			$params->remove($param);
 		}
 	}
-- 
cgit v1.2.3