ispman/ispman-web/cgi-bin/tmpl/dns edit_Arecords.tmpl, 1.14, 1.15 edit_CNAMES.tmpl, 1.12, 1.13 edit_MXrecords.tmpl, 1.12, 1.13 edit_NSrecords.tmpl, 1.8, 1.9
Joerg Delker <[email protected]>
| Newsgroups | gmane.comp.isp.ispman.cvs |
|---|---|
| Message-ID | <[email protected]> |
Update of /cvsroot/ispman/ispman/ispman-web/cgi-bin/tmpl/dns
In directory sc8-pr-cvs2.sourceforge.net:/tmp/cvs-serv32037/ispman-web/cgi-bin/tmpl/dns
Modified Files:
edit_Arecords.tmpl edit_CNAMES.tmpl edit_MXrecords.tmpl
edit_NSrecords.tmpl
Log Message:
face lift
HTML debugging
Index: edit_CNAMES.tmpl
===================================================================
RCS file: /cvsroot/ispman/ispman/ispman-web/cgi-bin/tmpl/dns/edit_CNAMES.tmpl,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- edit_CNAMES.tmpl 20 Jun 2004 11:46:20 -0000 1.12
+++ edit_CNAMES.tmpl 6 Jun 2006 20:59:39 -0000 1.13
@@ -1,5 +1,24 @@
-<LINK HREF="<perl>$ispman->getConfig('ispmanUrlPrefix')</perl>/ispman.css" REL="stylesheet" TYPE="text/css">
-
+<script type="text/javascript">
+ var domain="<perl>$r->param("ispmanDomain")</perl>";
+ var cgiurl=window.location.pathname;
+ var hrefurl=window.location.href;
+
+ function sortBy(column){
+ location=cgiurl+"?mode=editDNScnameRecords&ispmanDomain="+domain+"&sortby="+column;
+ }
+
+ function submitForm(f,action){
+ switch(action){
+ case 'add': f.mode.value="addDNScNAMERecord"; break;
+ case 'update': f.mode.value="modifyDNScNAMERecord"; break;
+ case 'delete': f.mode.value="deleteDNScNAMERecord"; break;
+ }
+ f.ispmanDomain.value=domain;
+ f.action=cgiurl;
+ f.submit();
+ }
+</script>
+
<perl>
my $text="";
my $c=1;
@@ -9,11 +28,23 @@
<P>
@{[_("Editing CNAME Records for domain:")]} $thisDomain
-
-<table border=0 cellpadding=0 cellspacing=5><tr>
-<th><a href='$ENV{'SCRIPT_NAME'}?mode=editDNScNAMERecords&ispmanDomain=$thisDomain&sortby=alias'>@{[_("Alias")]}</a></th>
-<th><a href='$ENV{'SCRIPT_NAME'}?mode=editDNScNAMERecords&ispmanDomain=$thisDomain&sortby=host'>@{[_("Host")]}</a></th>
-</tr>|;
+<table class=dns>
+ <tr>
+ <th><a href='javascript:sortBy("alias")'>@{[_("Alias")]}</a></th>
+ <th><a href='javascript:sortBy("host")'>@{[_("Host")]}</a></th>
+ <th> </th>
+ </tr>
+
+ <tr>
+ <form method=POST>
+ <input type=hidden name=ispmanDomain>
+ <input type=hidden name=mode>
+ <td><input type=text name=alias></td>
+ <td><input type=text name=host></td>
+ <td><input type=button onClick='submitForm(this.form,"add")' value='@{[_("Add")]}'></td>
+ </form>
+ </tr>
+|;
my $sortby=$r->param("sortby") || "alias";
my @sorted=();
@@ -32,45 +63,23 @@
for (@sorted){
- $text.=qq|
- <form method=POST name="cnamesModifyForm">
- <input type=hidden name=ispmanDomain value="@{[$thisDomain]}">
- <input type=hidden name=mode value="modifyDNScNAMERecord">
- <input type=hidden name=dn value="@{[$ispman->getcNAMERecordDn($thisDomain, $_->{'host'}, $_->{'alias'})]}">
- |;
-
-
- $class="line". $c%2;
- $text.="\n<tr class=$class>";
- $text.="\n<td><input type=text name='alias' value='$_->{'alias'}'></td>";
- $text.="\n<td><input type=text name='host' value='$_->{'host'}'></td>";
- $text.="\n<td><input onClick=\"document.forms['cnamesModifyForm'].submit()\" class=button type=submit value='";
- $text.=_("Update");
- $text.="'></td>";
- $text.="\n</tr>";
+ $text.="<tr>";
+ $text.="<form method=POST>";
+ $text.="<input type=hidden name='dn' value='@{[$ispman->getcNAMERecordDn($thisDomain, $_->{'host'}, $_->{'alias'})]}'>";
+ $text.="<input type=hidden name='ispmanDomain'>";
+ $text.="<input type=hidden name='mode'>";
+ $text.="<td><input type=text name='alias' value='$_->{'alias'}'></td>";
+ $text.="<td><input type=text name='host' value='$_->{'host'}'></td>";
+ $text.="<td>\n";
+ $text.="<input type=image onClick='submitForm(this.form,\"update\")' src='".$ispman->getConfig("ispmanUrlPrefix")."/gfx/apply.gif'>\n";
+ $text.="<input type=image onClick='submitForm(this.form,\"delete\")' src='".$ispman->getConfig("ispmanUrlPrefix")."/gfx/delete.gif'>\n";
+ $text.="</td>\n";
+ $text.="</form>";
+ $text.="</tr>";
$c++;
- $text.="\n</form>\n";
}
$text
</perl>
- <form name="cnamesAddForm" method=POST>
- <tr><td colspan=2><perl>_("Add new CNAME Record")</perl><br>
-<hr noshade></td></tr>
-
- <tr class=line0>
- <input type=hidden name=ispmanDomain value="<perl>$r->param("ispmanDomain")</perl>">
- <input type=hidden name=mode value="addDNScNAMERecord">
- <td><input type=text name=alias value=''></td>
- <td><input type=text name=host value=''></td>
- </tr>
- <tr>
-
- <td colspan=2 align=right>
- <input type=button class="button" onClick="document.forms['cnamesAddForm'].submit()" value="<perl>_("Save")</perl>">
- </td>
- </tr>
- </form>
-
</table>
Index: edit_Arecords.tmpl
===================================================================
RCS file: /cvsroot/ispman/ispman/ispman-web/cgi-bin/tmpl/dns/edit_Arecords.tmpl,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -d -r1.14 -r1.15
--- edit_Arecords.tmpl 20 Jun 2004 11:46:20 -0000 1.14
+++ edit_Arecords.tmpl 6 Jun 2006 20:59:39 -0000 1.15
@@ -1,7 +1,24 @@
-<LINK HREF="<perl>$ispman->getConfig('ispmanUrlPrefix')</perl>/ispman.css" REL="stylesheet" TYPE="text/css">
-<perl>_("To Delete a record, remove its values and click on update.")</perl>
+<script type="text/javascript">
+ var domain="<perl>$r->param("ispmanDomain")</perl>";
+ var cgiurl=window.location.pathname;
+ var hrefurl=window.location.href;
+
+ function sortBy(column){
+ location=cgiurl+"?mode=editDNSaRecords&ispmanDomain="+domain+"&sortby="+column;
+ }
+
+ function submitForm(f,action){
+ switch(action){
+ case 'add': f.mode.value="addDNSaRecord"; break;
+ case 'update': f.mode.value="modifyDNSaRecord"; break;
+ case 'delete': f.mode.value="deleteDNSaRecord"; break;
+ }
+ f.ispmanDomain.value=domain;
+ f.action=cgiurl;
+ f.submit();
+ }
+</script>
-
<perl>
my $text="";
my $c=1;
@@ -10,30 +27,26 @@
$text.=qq|
<P>
@{[_("Editing A Records for domain:")]} $thisDomain
-<table border=0 cellpadding=0 cellspacing=5><tr>
-<th><a href='$ENV{'SCRIPT_NAME'}?mode=editDNSaRecords&ispmanDomain=$thisDomain&sortby=host'>@{[_("Hostname")]}</a></th>
-<th><a href='$ENV{'SCRIPT_NAME'}?mode=editDNSaRecords&ispmanDomain=$thisDomain&sortby=ip'>@{[_("IP Address")]}</a></th>
-<th><a href='$ENV{'SCRIPT_NAME'}?mode=editDNSaRecords&ispmanDomain=$thisDomain&sortby=ptr'>@{[_("Rev.")]}</a></th>
-</tr>
-
- <form name="aAddForm" method=POST>
- <tr><td colspan=2>@{[_("Add new A Record")]}<br>
- <hr noshade></td></tr>
+<table class=dns>
+ <tr>
+ <th><a href='javascript:sortBy("host")'>@{[_("Hostname")]}</a></th>
+ <th><a href='javascript:sortBy("ip")'>@{[_("IP Address")]}</a></th>
+ <th><a href='javascript:sortBy("ptr")'>@{[_("Rev.")]}</a></th>
+ <th> </th>
+ </tr>
- <tr class=line0>
- <input type=hidden name=ispmanDomain value="$thisDomain">
- <input type=hidden name=mode value="addDNSaRecord">
- <td><input type=text name=host value=''></td>
- <td><input type=text name=ip></td>
- <td><input class=checkbox type=checkbox name=pTRRecord></td>
-
- <td>
- <input type=button class="button" onClick="document.forms['aAddForm'].submit()" value="@{[_("Save")]}">
-
- </td>
- </tr>
- </form>|;
+ <tr>
+ <form method=POST>
+ <input type=hidden name=ispmanDomain>
+ <input type=hidden name=mode>
+ <td><input type=text name=host></td>
+ <td><input type=text name=ip></td>
+ <td><input class=checkbox type=checkbox name=pTRRecord></td>
+ <td><input type=button onClick='submitForm(this.form,"add")' value='@{[_("Add")]}'></td>
+ </form>
+ </tr>
+|;
my $sortby=$r->param("sortby") || "host";
my @sorted=();
@@ -59,37 +72,26 @@
}
for (@sorted){
- $text.=qq|
- <form name="aModifyForm" method="POST">
- <input type=hidden name=ispmanDomain value="@{[$r->param("ispmanDomain")]}">
- <input type=hidden name=mode value="modifyDNSaRecord">
- <input type=hidden name=dn value="@{[$ispman->getARecordDn($r->param("ispmanDomain"), $_->{'host'}, $_->{'ip'})]}">
- |;
-
-
-
- $class="line". $c%2;
- $text.="<tr class=$class>";
- $text.="\n<td><input type=text name='host' value='$_->{'host'}'></td>";
- $text.="\n<td><input type=text name='ip' value='$_->{'ip'}'></td>";
- $text.="\n<td><input class=checkbox type=checkbox name=pTRRecord ";
- if ($_->{'ptr'}) {
- $text.=" checked ";
- }
-
+ $text.="<tr>";
+ $text.="<form method=POST>";
+ $text.="<input type=hidden name='dn' value='@{[$ispman->getARecordDn($thisDomain, $_->{'host'}, $_->{'ip'})]}'>";
+ $text.="<input type=hidden name='ispmanDomain'>";
+ $text.="<input type=hidden name='mode'>";
+ $text.="<td><input type=text name='host' value='$_->{'host'}'></td>";
+ $text.="<td><input type=text name='ip' value='$_->{'ip'}'></td>";
+ $text.="<td><input class=checkbox type=checkbox name=pTRRecord ";
+ $text.=" checked " if ($_->{'ptr'});
$text.="></td>";
- $text.="\n<td><input type=submit onClick=\"document.forms['aModifyForm'].submit()\" class=button value='";
- $text.=_('Update');
- $text.="'></td>";
- $text.="\n</tr>";
- $c++;
+ $text.="<td>\n";
+ $text.="<input type=image onClick='submitForm(this.form,\"update\")' src='".$ispman->getConfig("ispmanUrlPrefix")."/gfx/apply.gif'>\n";
+ $text.="<input type=image onClick='submitForm(this.form,\"delete\")' src='".$ispman->getConfig("ispmanUrlPrefix")."/gfx/delete.gif'>\n";
+ $text.="</td>\n";
$text.="</form>";
+ $text.="</tr>";
+ $c++;
}
$text
-
</perl>
-</form>
-
</table>
Index: edit_NSrecords.tmpl
===================================================================
RCS file: /cvsroot/ispman/ispman/ispman-web/cgi-bin/tmpl/dns/edit_NSrecords.tmpl,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -d -r1.8 -r1.9
--- edit_NSrecords.tmpl 17 Jun 2003 16:07:43 -0000 1.8
+++ edit_NSrecords.tmpl 6 Jun 2006 20:59:40 -0000 1.9
@@ -1,57 +1,84 @@
-<LINK HREF="<perl>$ispman->getConfig('ispmanUrlPrefix')</perl>/ispman.css" REL="stylesheet" TYPE="text/css">
-
-
-
-
- <P>
-<perl>_("Editing NS Records for domain:")</perl> <perl>$r->param("ispmanDomain")</perl>
-
+<script type="text/javascript">
+ var domain="<perl>$r->param("ispmanDomain")</perl>";
+ var cgiurl=window.location.pathname;
+ var hrefurl=window.location.href;
+
+ function sortBy(column){
+ location=cgiurl+"?mode=editDNSnSRecords&ispmanDomain="+domain+"&sortby="+column;
+ }
+
+ function submitForm(f,action){
+ switch(action){
+ case 'add': f.mode.value="addDNSnSRecord"; break;
+ case 'update': f.mode.value="modifyDNSnSRecord"; break;
+ case 'delete': f.mode.value="deleteDNSnSRecord"; break;
+ }
+ f.ispmanDomain.value=domain;
+ f.action=cgiurl;
+ f.submit();
+ }
+</script>
-<table border=0 cellpadding=0 cellspacing=5><tr><th><perl>_("Origin")</perl> </th><th><perl>_("Name Server")</perl></th></tr>
<perl>
my $text="";
my $c=1;
-for (@{$ispman->{'domain'}{'dns'}}){
- $text.=qq|
- <form method=POST name="nsModifyForm">
- <input type=hidden name=ispmanDomain value="@{[$r->param("ispmanDomain")]}">
- <input type=hidden name=mode value="modifyDNSnSRecord">
- <input type=hidden name=dn value="@{[$ispman->getnSRecordDn($r->param("ispmanDomain"), $_->{'origion'}, $_->{'host'})]}">
- |;
-
- $class="line". $c%2;
- $text.="<tr class=$class>";
+my $thisDomain=$r->param("ispmanDomain");
+
+$text.=qq|
+<P>
+@{[_("Editing NS Records for domain:")]} $thisDomain
+
+<table class=dns>
+ <tr>
+ <th><a href='javascript:sortBy("origion")'>@{[_("Origin")]}</a></th>
+ <th><a href='javascript:sortBy("host")'>@{[_("Name Server")]}</a></th>
+ <th> </th>
+ </tr>
+
+ <tr>
+ <form method=POST>
+ <input type=hidden name='ispmanDomain'>
+ <input type=hidden name='mode'>
+ <td><input type=text name=origion value=''></td>
+ <td><input type=text name=host value=''></td>
+ <td><input type=button onClick='submitForm(this.form,"add")' value='@{[_("Add")]}'></td>
+ </form>
+ </tr>
+|;
+
+my $sortby=$r->param("sortby") || "origin";
+my @sorted=();
+
+if ($ispman->{'domain'}{'dns'}){
+ if ($sortby eq 'host') {
+ @sorted=sort {
+ $a->{'host'} cmp $b->{'host'} || $a->{'origion'} cmp $b->{'origion'}
+ } @{$ispman->{'domain'}{'dns'}};
+ } else {
+ @sorted=sort {
+ $a->{'origion'} cmp $b->{'origion'} || $a->{'host'} <=> $b->{'host'}
+ } @{$ispman->{'domain'}{'dns'}};
+ }
+}
+
+for (@sorted){
+ $text.="<tr>";
+ $text.="<form method=POST>";
+ $text.="<input type=hidden name='dn' value='@{[$ispman->getnSRecordDn($thisDomain, $_->{'origion'}, $_->{'host'})]}'>";
+ $text.="<input type=hidden name='ispmanDomain'>";
+ $text.="<input type=hidden name='mode'>";
$text.="<td><input type=text name='origion' value='$_->{'origion'}'></td>";
$text.="<td><input type=text name='host' value='$_->{'host'}'></td>";
- $text.="\n<td><input type=submit onClick=\"document.forms['nsModifyForm'].submit()\" class='button' value='";
- $text.=_("Update");
- $text.="'></td>";
- $text.="\n</tr>";
- $c++;
+ $text.="<td>\n";
+ $text.="<input type=image onClick='submitForm(this.form,\"update\")' src='".$ispman->getConfig("ispmanUrlPrefix")."/gfx/apply.gif'>\n";
+ $text.="<input type=image onClick='submitForm(this.form,\"delete\")' src='".$ispman->getConfig("ispmanUrlPrefix")."/gfx/delete.gif'>\n";
+ $text.="</td>\n";
$text.="</form>";
+ $text.="</tr>";
+ $c++;
}
$text
</perl>
-<tr>
-</form>
- <form name="nsAddForm" method=POST>
- <tr><td colspan=2><perl>_("Add new NS Record")</perl><br>
- <hr noshade></td></tr>
-
- <tr class=line0>
- <input type=hidden name=ispmanDomain value="<perl>$r->param("ispmanDomain")</perl>">
- <input type=hidden name=mode value="addDNSnSRecord">
- <td><input type=text name=origion value=''></td>
- <td><input type=text name=host value=''></td>
- </tr>
- <tr>
- <td colspan=3 align=right>
- <input type=button class="button" onClick="document.forms['nsAddForm'].reset()" value="<perl>_("Discard Changes")</perl>">
- <input type=button class="button" onClick="document.forms['nsAddForm'].submit()" value="<perl>_("Save Entry")</perl>">
- </td>
- </tr>
- </form>
-
</table>
Index: edit_MXrecords.tmpl
===================================================================
RCS file: /cvsroot/ispman/ispman/ispman-web/cgi-bin/tmpl/dns/edit_MXrecords.tmpl,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- edit_MXrecords.tmpl 20 Jun 2004 11:46:20 -0000 1.12
+++ edit_MXrecords.tmpl 6 Jun 2006 20:59:39 -0000 1.13
@@ -1,5 +1,24 @@
-<LINK HREF="<perl>$ispman->getConfig('ispmanUrlPrefix')</perl>/ispman.css" REL="stylesheet" TYPE="text/css">
-
+<script type="text/javascript">
+ var domain="<perl>$r->param("ispmanDomain")</perl>";
+ var cgiurl=window.location.pathname;
+ var hrefurl=window.location.href;
+
+ function sortBy(column){
+ location=cgiurl+"?mode=editDNSmXRecords&ispmanDomain="+domain+"&sortby="+column;
+ }
+
+ function submitForm(f,action){
+ switch(action){
+ case 'add': f.mode.value="addDNSmXRecord"; break;
+ case 'update': f.mode.value="modifyDNSmXRecord"; break;
+ case 'delete': f.mode.value="deleteDNSmXRecord"; break;
+ }
+ f.ispmanDomain.value=domain;
+ f.action=cgiurl;
+ f.submit();
+ }
+</script>
+
<perl>
my $text="";
my $c=1;
@@ -9,11 +28,25 @@
<P>
@{[_("Editing MX Records for domain:")]} $thisDomain
-<table border=0 cellpadding=0 cellspacing=5><tr>
-<th><a href='$ENV{'SCRIPT_NAME'}?mode=editDNSmXRecords&ispmanDomain=$thisDomain&sortby=origion'>@{[_("Origin")]}</a></th>
-<th><a href='$ENV{'SCRIPT_NAME'}?mode=editDNSmXRecords&ispmanDomain=$thisDomain&sortby=host'>@{[_("Host")]}</a></th>
-<th><a href='$ENV{'SCRIPT_NAME'}?mode=editDNSmXRecords&ispmanDomain=$thisDomain&sortby=prio'>@{[_("Priority")]}</a></th>
-</tr>|;
+<table class=dns>
+ <tr>
+ <th><a href='javascript:sortBy("origion")'>@{[_("Origin")]}</a></th>
+ <th><a href='javascript:sortBy("host")'>@{[_("Host")]}</a></th>
+ <th><a href='javascript:sortBy("prio")'>@{[_("Priority")]}</a></th>
+ <th> </th>
+ </tr>
+
+ <tr>
+ <form method=POST>
+ <input type=hidden name='ispmanDomain'>
+ <input type=hidden name='mode'>
+ <td><input type=text name=origion value=''></td>
+ <td><input type=text name=host value=''></td>
+ <td><input size=5 type=text name=pref value=''></td>
+ <td><input type=button onClick='submitForm(this.form,"add")' value='@{[_("Add")]}'></td>
+ </form>
+ </tr>
+|;
my $sortby=$r->param("sortby") || "origin";
my @sorted=();
@@ -21,64 +54,38 @@
if ($ispman->{'domain'}{'dns'}){
if ($sortby eq 'host') {
@sorted=sort {
- $a->{'host'} cmp $b->{'host'} ||
- $a->{'origion'} cmp $b->{'origion'}
+ $a->{'host'} cmp $b->{'host'} || $a->{'origion'} cmp $b->{'origion'}
} @{$ispman->{'domain'}{'dns'}};
} elsif ($sortby eq 'prio') {
@sorted=sort {
- $a->{'pref'} <=> $b->{'pref'} ||
- $a->{'origion'} cmp $b->{'origion'}
+ $a->{'pref'} <=> $b->{'pref'} || $a->{'origion'} cmp $b->{'origion'}
} @{$ispman->{'domain'}{'dns'}};
} else {
@sorted=sort {
- $a->{'origion'} cmp $b->{'origion'} ||
- $a->{'pref'} <=> $b->{'pref'}
+ $a->{'origion'} cmp $b->{'origion'} || $a->{'pref'} <=> $b->{'pref'}
} @{$ispman->{'domain'}{'dns'}};
}
}
for (@sorted){
- $text.=qq|
- <form method=POST name="mxModifyForm">
- <input type=hidden name=ispmanDomain value="@{[$thisDomain]}">
- <input type=hidden name=mode value="modifyDNSmXRecord">
- <input type=hidden name=dn value="@{[$ispman->getmXRecordDn($thisDomain, $_->{'origion'}, $_->{'pref'}, $_->{'host'})]}">
- |;
-
- $class="line". $c%2;
- $text.="<tr class=$class>";
+ $text.="<tr>";
+ $text.="<form method='POST'>";
+ $text.="<input type=hidden name='dn' value='@{[$ispman->getmXRecordDn($thisDomain, $_->{'origion'}, $_->{'pref'}, $_->{'host'})]}'>";
+ $text.="<input type=hidden name='ispmanDomain'>";
+ $text.="<input type=hidden name='mode'>";
$text.="<td><input type=text name='origion' value='$_->{'origion'}'></td>";
$text.="<td><input type=text name='host' value='$_->{'host'}'></td>";
- $text.="<td><input size=5 type=text name='pref' value='$_->{'pref'}'></td>";
- $text.="\n<td><input type=submit onClick=\"document.forms['mxModifyForm'].submit()\" class='button' value='Update'></td>";
- $text.="\n</tr>";
+ $text.="<td><input size=5 type=text name='pref' value='$_->{'pref'}'></td>\n";
+ $text.="<td>\n";
+ $text.="<input type=image onClick='submitForm(this.form,\"update\")' src='".$ispman->getConfig("ispmanUrlPrefix")."/gfx/apply.gif'>\n";
+ $text.="<input type=image onClick='submitForm(this.form,\"delete\")' src='".$ispman->getConfig("ispmanUrlPrefix")."/gfx/delete.gif'>\n";
+ $text.="</td>\n";
$text.="</form>";
+ $text.="</tr>";
$c++;
}
$text
</perl>
-<tr>
-</form>
- <form name="mxAddForm" method=POST>
- <tr><td colspan=2><perl>_("Add new MX Record")</perl><br>
-<hr noshade></td></tr>
-
- <tr class=line0>
- <input type=hidden name=ispmanDomain value="<perl>$r->param("ispmanDomain")</perl>">
- <input type=hidden name=mode value="addDNSmXRecord">
- <td><input type=text name=origion value=''></td>
- <td><input type=text name=host value=''></td>
- <td><input size=5 type=text name=pref value=''></td>
- </tr>
- <tr>
-
- <td colspan=3 align=right>
- <input type=button class="button" onClick="document.forms['mxAddForm'].reset()" value="<perl>_("Discard Changes")</perl>">
- <input type=button class="button" onClick="document.forms['mxAddForm'].submit()" value="<perl>_("Save Entry")</perl>">
- </td>
- </tr>
- </form>
-
</table>