<% use obfui::cmn; my ($have_extr,$what,$bases) = @_;  %>
<h2><%= $what eq 'code' ?
    __('Select a profile to be used for mangling code in the project: ') :
    __('Select a profile to be used for mangling html markup around code  in the project: ') 
 %></h2>

<%= 
   !$have_extr ? "" : 
    ($what eq 'code' ?
    __('Please select the profile for protecting code in the project - in raw files and inside some client-side or server-side markup. Profile for jamming of redundant spaces around html tags and removing html comments is selected using "Project->Switch mode for mangling html markup around code.." menu item.') :
    __('Please select the profile for jamming redundant whitespace between html tags and removing HTML comments. It will not affect jamming whitespaces and removing comments inside the scripts!! The profile for mangling scripts can be selected using "Project->Switch debugging/production mode for code mangling.." menu item.')
    )
 %>


<p>
<form method=post>
<input type=hidden name=havevals value=1>
<dl>
<% foreach (@$bases) { 
    my ($id,$title,$descr,$iscur) = @$_; %>
    <dt><input type=radio name=newbase value=<%$ $id %> 
		<%$ $iscur ? 'checked' : '' %> ></input>
    <a class=noul title="<%= $descr %>"
	  href=modes.edit.$id><%= $title %></a>
    </dt>
    <dd><pre><%= $descr %></pre></dd>
<% } %>
</dl>
<p>
<% $forge->include('wgt-submitbtn'); %>
</form>
