зеркало из https://github.com/mozilla/pjs.git
Adding bonsai tree name field, plus hints in parens so it's easier for newbies to figure this out.
This commit is contained in:
Родитель
aac0fdb8d5
Коммит
c4a2c6974e
|
@ -146,20 +146,32 @@ print "
|
|||
<FORM method=post action=doadmin.cgi>
|
||||
<INPUT TYPE=HIDDEN NAME=tree VALUE=$tree>
|
||||
<INPUT TYPE=HIDDEN NAME=command VALUE=create_tree>
|
||||
<b>Create a new tinderbox page.</b>
|
||||
<b>Create a new tinderbox page, examples for SeaMonkey shown in parens.</b>
|
||||
<TABLE>
|
||||
<TR>
|
||||
<TD>tinderbox tree name:</TD>
|
||||
<TD><INPUT NAME=treename VALUE=''></TD>
|
||||
</TR><TR>
|
||||
<TD>(SeaMonkey)</TD>
|
||||
</TR>
|
||||
<TR>
|
||||
<TD>cvs repository:</TD>
|
||||
<TD><INPUT NAME=repository VALUE=''></TD>
|
||||
</TR><TR>
|
||||
<TD>(/cvsroot)</TD>
|
||||
</TR>
|
||||
<TR>
|
||||
<TD>cvs module name:</TD>
|
||||
<TD><INPUT NAME=modulename VALUE=''></TD>
|
||||
</TR><TR>
|
||||
<TD>(MozillaTinderboxAll)</TD>
|
||||
</TR>
|
||||
<TR>
|
||||
<TD>cvs branch:</TD>
|
||||
<TD><INPUT NAME=branchname VALUE='HEAD'></TD>
|
||||
<TD>(HEAD)</TD>
|
||||
</TR>
|
||||
<TR>
|
||||
<TD>bonsai tree:</TD>
|
||||
<TD><INPUT NAME=bonsaitreename></TD>
|
||||
<TD>(SeaMonkey)</TD>
|
||||
</TR>
|
||||
</TABLE>
|
||||
<B>Password:</B> <INPUT NAME=password TYPE=password>
|
||||
|
|
|
@ -119,6 +119,7 @@ sub create_tree {
|
|||
my $repository = $form{'repository'};
|
||||
$modulename = $form{'modulename'};
|
||||
$branchname = $form{'branchname'};
|
||||
$bonsaitreename = $form{'bonsaitreename'};
|
||||
|
||||
if( -r $treename ){
|
||||
chmod 0777, $treename;
|
||||
|
@ -129,6 +130,7 @@ sub create_tree {
|
|||
open( F, ">$treename/treedata.pl" );
|
||||
print F "\$cvs_module='$modulename';\n";
|
||||
print F "\$cvs_branch='$branchname';\n";
|
||||
print F "\$bonsai_tree='$bonsaitreename';\n";
|
||||
if ($repository ne "") {
|
||||
print F "\$cvs_root='$repository';\n";
|
||||
}
|
||||
|
|
Загрузка…
Ссылка в новой задаче