Skip to content

bugzilla
bugzilla
Commit dc8e636e authored by cyeh%bluemartini.com's avatar cyeh%bluemartini.com
Browse files
Options

fix submitted for 42809: bug_email.pl doesn't allow for priority = 0

patch submitted by brad@xyu.dhs.org (Brad Sarsfield)
parent 6fc3ee11
Hide whitespace changes
Inline Side-by-side
Showing with 3 additions and 3 deletions
contrib/bug_email.pl
View file @ dc8e636e
...@@ -37,7 +37,7 @@ ...@@ -37,7 +37,7 @@
# #
# You need to work with bug_email.pl the MIME::Parser installed. # You need to work with bug_email.pl the MIME::Parser installed.
# #
# $Id: bug_email.pl,v 1.6 2000/03/18 23:32:49 seth%cs.brandeis.edu Exp $ # $Id: bug_email.pl,v 1.7 2000/08/30 21:47:17 cyeh%bluemartini.com Exp $
############################################################### ###############################################################
# 02/12/2000 (SML) # 02/12/2000 (SML)
...@@ -285,10 +285,10 @@ sub getEnumList( $ ) ...@@ -285,10 +285,10 @@ sub getEnumList( $ )
# Uses the global var. $Control{ 'priority' } # Uses the global var. $Control{ 'priority' }
sub CheckPriority sub CheckPriority
{ {
my $prio = ($Control{'priority'} ||= ""); my $prio = $Control{'priority'};
my @all_prios = getEnumList( "priority" ); my @all_prios = getEnumList( "priority" );
if( (lsearch( \@all_prios, $prio ) == -1) || $prio eq "" ) { if( $prio eq "" || (lsearch( \@all_prios, $prio ) == -1) ) {
# OK, Prio was not defined - create Answer # OK, Prio was not defined - create Answer
my $Text = "You sent wrong priority-setting, valid values are:" . my $Text = "You sent wrong priority-setting, valid values are:" .
join( "\n\t", @all_prios ) . "\n\n"; join( "\n\t", @all_prios ) . "\n\n";
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment