<%
    use obfui::cmn;
    my ($all) = @_;
%>
<%= __('Specify patterns (either SPACE-SEPARATED list of extensions - like "cxx c cpp" or Perl regular expression that is matched against full pathname) and modes to use for files, that are listed as "not in the project" in Project->Files screen.:') %>
<p>
<form method=post>
<input type=hidden name=havevals value=1>
<input type=hidden name=itemcount value=<%$ (0+@$all) %> >
<div class=stretchformfields>
<table>
<%
    foreach my $i (@$all)
    {
	my ($type_html,$pattern_html,$modenm_html) = @$i;
	my $s = "<select ";
	my $r = "$s  style='width: 18em;' ";
	$type_html =~ s/$s/$r/g;
	$r = "$s  style='width: 40em;' ";
	$modenm_html =~ s/$s/$r/g;
	# class=width-of-selec
%>
<tr><td><%$ $type_html %></td><td><input class=text type=text <%$ $pattern_html %> ></td>
<td><%$ $modenm_html %></td>
<%    }
%>
</table>
</div>



<p>

<% $forge->include('wgt-btns-ok-cancel') %>
</form>

