Subversion Repositories PEEPS

Rev

Rev 6 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6 Rev 12
Line 141... Line 141...
141 
                         [ $h->div ({ class=>"rTableCellr".($_->[1] eq "Pending" ? " highlighted" : ""), style=>"font-size: smaller;".($_->[1] eq "Pending" ? " font-style: italic;" : "") },
 141 
                         [ $h->div ({ class=>"rTableCellr".($_->[1] eq "Pending" ? " highlighted" : ""), style=>"font-size: smaller;".($_->[1] eq "Pending" ? " font-style: italic;" : "") },
142 
                           $_->[1], [ $h->input ({type=>"submit", name=>"Delete", value=>"Delete", onClick=>"this.value=$_->[0]"}) ] ) ]) } @roles; # Change button -> , $h->input ({type=>"submit", name=>"Change", value=>"Change", onClick=>"this.value=$_->[0]"})
 142 
                           $_->[1], [ $h->input ({type=>"submit", name=>"Delete", value=>"Delete", onClick=>"this.value=$_->[0]"}) ] ) ]) } @roles; # Change button -> , $h->input ({type=>"submit", name=>"Change", value=>"Change", onClick=>"this.value=$_->[0]"})
Line 143... Line 143...
143 
 
 143 
 
144 
if (WebDB::trim scalar param ("Add")) {
 144 
if (WebDB::trim scalar param ("Add")) {
145 
  use tableViewer qw(notInArray);
 145 
  use tableViewer qw(notInArray);
146 
  my @allowed_roles = grep { notInArray ($_, [map { $_->[1] } @roles]) } map { $_->[0] } @{ $dbh->selectall_arrayref ("select distinct role from role order by role") };
 146 
  my @allowed_roles = grep { notInArray ($_, [map { $_->[1] } @roles]) } grep { $_ ne "System Admin" unless $league_name eq "WFTDA Leadership" } grep { $_ ne "Pending" } map { $_->[0] } @{ $dbh->selectall_arrayref ("select distinct role from role order by role") };
147 
  push @leagueroles, $h->div ({ class=>"rTableRow shaded" },
 147 
  push @leagueroles, $h->div ({ class=>"rTableRow shaded" },
148 
                       [ $h->div ({ class=>"rTableCellr"}, $h->select ({name=>"newrole"}, [ map { $h->option ($_) } @allowed_roles ]), $h->input ({type=>"submit", name=>"savenewrole", value=>"Save"}).' '.$h->button ("Cancel")) ]);
 148 
                       [ $h->div ({ class=>"rTableCellr"}, $h->select ({name=>"newrole"}, [ map { $h->option ($_) } @allowed_roles ]), $h->input ({type=>"submit", name=>"savenewrole", value=>"Save"}).' '.$h->button ("Cancel")) ]);
Line 149... Line 149...
149 
}
 149 
}