<%
    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>

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


<% $forge->include('wgt-gobtn',__('Delete this project'), 
    "project.delete",'confirm',
    __('Do you really wish to delete this project?'), 'class'=>'button-wide' ) %>
<p>


<p>

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

