Modify filter to allow legitimate stage names.
authorAndrew Dunstan <andrew@dunslane.net>
Sun, 25 Mar 2012 16:41:24 +0000 (09:41 -0700)
committerAndrew Dunstan <andrew@dunslane.net>
Sun, 25 Mar 2012 16:41:24 +0000 (09:41 -0700)
cgi-bin/show_failures.pl

index 3169b845191174dd64a3fa04c56c68d56edcd48f..48f0e978d0f67db25a406a0cc461f322548bf5dc 100755 (executable)
@@ -25,7 +25,7 @@ my $max_days =  $query->param('max_days') + 0 || 10;
 my @branches = grep {$_ ne "" } $query->param('branch');
 map { s/[^a-zA-Z0-9_ -]//g; } @branches;
 my @stages = grep {$_ ne "" } $query->param('stage');
-map { s/[^a-zA-Z0-9_ -]//g; } @stages;
+map { s/[^a-zA-Z0-9_ :-]//g; } @stages;
 
 my $dsn="dbi:Pg:dbname=$dbname";
 $dsn .= ";host=$dbhost" if $dbhost;