<%
    use obfui::cmn;
    my ($s,$prj,$typehtml,$filename) = @_;
    my @popts = (
	[hstr('prj.title',__('Project title')),		'entry',	$prj->{title},	'title'],
	[hstr('prj.indir',__('Input directory')),	'entry',	$prj->{indir},	'indir'],
	[hstr('prj.outdir',__('Output directory')),	'entry',	$prj->{outdir},	'outdir'],
	[hstr('prj.stdir',__('State files directory')),	'entry',	$prj->{stdir},	'stdir'],
	[hstr('prj.precmdline',__('Commandline to run BEFORE building project')),	
		    'entry',	$prj->{precmdline},	'precmdline'],
	[hstr('prj.postcmdline',__('Commandline to run AFTER building project')),
		    'entry',	$prj->{postcmdline},	'postcmdline'],
	[hstr('prj.testcmd',__('Test command')),	'entry',	$prj->{testcmdline},'testcmdline'],
	[hstr('prj.codetype',__('Code type')),		'html',		$typehtml ]
    );
%>
<form method=post>
<input type=hidden name=havevals value=1>

<div class=stretchformfields>
<table>
<%
    foreach my $i (@popts)
    {
%>
<tr><td><%$ $i->[0] %></td><td class=width-of-select
    ><% if ($i->[1] eq 'entry') 
	{ %><input class=text type=text name=<%$ $i->[3] %> 
	value="<%= $i->[2] %>" style='width: 100%'></td>
	<% 
	} else { 
	    print $i->[2]; 
	} 
    }
%>
</table>
</div>
<p>
<%$ hstr('prj.listofmodes',__('List of special file-processing modes:')) %>
<% 
    $forge->include('wgt-modelist',$prj,[
	    sort { $prj->{modes}->{$a}->{title} cmp 
		$prj->{modes}->{$b}->{title} } 
	    grep { !$prj->{modes}->{$_}->{filer_visible} }
	    keys %{$prj->{modes}}
	],'ul');
%>



<%$ hstr('prj.listofmodes',__('List of end-user file-processing modes:')) %>
<% 
    $forge->include('wgt-modelist',$prj, [
	    sort { $prj->{modes}->{$a}->{title} cmp 
		$prj->{modes}->{$b}->{title} } 
	    grep { $prj->{modes}->{$_}->{filer_visible} }
	    keys %{$prj->{modes}}
	],'ul');
%>

<div style='font-size: 60%'>
<%= __('The project data resides in the file: ') %>
<code><%= $filename%></code></div>
<p>

<% $forge->include('wgt-gobtn',__("Create new mode"),'modes.new') %>
<% $forge->include('wgt-gobtn',__('Delete this project'), 
    "project.delete",'confirm',
    __('Do you really wish to delete this project?') ) %>
<p>

<p>

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

