From: Ian Campbell <ian.campbell@citrix.com>
Date: Thu, 23 May 2013 13:27:29 +0000 (+0100)
Subject: Bug.pm: Ensure severities are valid before passing them to SQL
X-Git-Url: http://xenbits.xensource.com/gitweb?a=commitdiff_plain;h=6c9fe4e52985e8f390b0479a54f68689db821136;p=people%2Faperard%2Femesinae.git

Bug.pm: Ensure severities are valid before passing them to SQL

Spotted by Tim Deegan
---

diff --git a/Emesinae/Bug.pm b/Emesinae/Bug.pm
index 270f9ea..21decc9 100644
--- a/Emesinae/Bug.pm
+++ b/Emesinae/Bug.pm
@@ -193,6 +193,7 @@ sub listall ($$;%) {
     elsif ( $args{State} eq "Closed" ) { push @where, qq(open = "false" ) }
 
     if ( $args{Severities} ) {
+        map { assert_valid_severity($_) } @ { $args{Severities} };
         push @where,
           join( " OR ", map { qq{severity = "$_"} } @{ $args{Severities} } );
     }