* Tue Oct 07 2025 Brian Read <brianr@koozali.org> 1.3-8.sme

- Apply change from startform to start_form and endform to end_form to CGI panels [SME: 12775-87]
This commit is contained in:
2025-10-08 06:49:09 +01:00
parent 92ab7704df
commit b0f71b04f8
2 changed files with 19 additions and 16 deletions

View File

@@ -527,7 +527,7 @@ sub showInitial ($$)
print '</table>';
}
print $q->endform;
print $q->end_form;
print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print '</FONT>';
@@ -554,7 +554,7 @@ sub showEdit ($)
esmith::cgi::genHeaderNonCacheable
($q, \%conf, 'Add or modify a Global procmail rule.');
print $q->startform (-method => 'POST',
print $q->start_form (-method => 'POST',
-action => $q->url (-absolute => 1));
print $q->table ({border => 0, cellspacing => 0, cellpadding => 4},
@@ -633,7 +633,7 @@ sub showEdit ($)
print $q->hidden (-name => 'pmRule', -override => 1, -default => $pmRule);
print $q->hidden (-name => 'oldpmRule', -override => 1, -default => $oldpmRule);
print $q->endform;
print $q->end_form;
print $q->p ($q->hr, $q->font ({size => "-1"}, "dungog.net/wiki",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print '</FONT>';
@@ -652,7 +652,7 @@ sub showGroup ($$)
esmith::cgi::genHeaderNonCacheable ($q, \%conf, 'Group mail Settings');
print $q->startform (-method => 'POST',
print $q->start_form (-method => 'POST',
-action => $q->url (-absolute => 1));
print $q->h4 ("Group Mail settings - $group");
@@ -672,7 +672,7 @@ sub showGroup ($$)
print $q->hidden (-name => 'state', -override => 1, -default => 'performGroup');
print $q->hidden (-name => 'group', -override => 1, -default => $group);
print $q->endform;
print $q->end_form;
print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print '</FONT>';
@@ -708,7 +708,7 @@ sub showGlobalEnable ($$)
esmith::cgi::genHeaderNonCacheable ($q, \%conf, 'Global Settings');
print $q->startform (-method => 'POST',
print $q->start_form (-method => 'POST',
-action => $q->url (-absolute => 1));
print $q->h4 ('Zarafa');
@@ -924,7 +924,7 @@ sub showGlobalEnable ($$)
-override => 1,
-default => 'globalSave');
print $q->endform;
print $q->end_form;
print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print '</FONT>';
@@ -1118,7 +1118,7 @@ sub showEnableProc ($$$)
print $q->hr;
}
print $q->startform
print $q->start_form
(-method => 'POST', -action => $q->url (-absolute => 1));
#get username from param, acctName is from deleteSingle
@@ -1461,7 +1461,7 @@ sub showEnableProc ($$$)
print $q->p ('<a href="emailsettings">configure</a> the admin settings in the E-mail panel');
}
print $q->endform;
print $q->end_form;
print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print '</FONT>';
@@ -1494,7 +1494,7 @@ sub showAdvancedRuleEdit ($)
esmith::cgi::genHeaderNonCacheable
($q, \%conf, 'Add or modify a users mail rule.');
print $q->startform (-method => 'POST',
print $q->start_form (-method => 'POST',
-action => $q->url (-absolute => 1));
print $q->table ({border => 0, cellspacing => 0, cellpadding => 4},
@@ -1576,7 +1576,7 @@ sub showAdvancedRuleEdit ($)
print $q->hidden (-name => 'oldpmRule', -override => 1, -default => $oldpmRule);
print $q->hidden (-name => 'acctName', -override => 1, -default => $acctName2);
print $q->endform;
print $q->end_form;
print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print '</FONT>';
@@ -1832,7 +1832,7 @@ sub performViewlog ($)
esmith::cgi::genHeaderNonCacheable
($q, \%conf, "$acct $file");
print $q->startform (-method => 'POST',
print $q->start_form (-method => 'POST',
-action => $q->url (-absolute => 1));
print $q->table ({border => 0, cellspacing => 0, cellpadding => 4});
@@ -1864,7 +1864,7 @@ sub performViewlog ($)
}
print $q->endform;
print $q->end_form;
print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print $q->end_html;
@@ -1885,7 +1885,7 @@ sub showHelp ($)
esmith::cgi::genHeaderNonCacheable
($q, \%conf, 'Email Help');
print $q->startform (-method => 'POST',
print $q->start_form (-method => 'POST',
-action => $q->url (-absolute => 1));
print $q->table ({border => 0, cellspacing => 0, cellpadding => 4},
@@ -2010,7 +2010,7 @@ if for example you are checking current activity and have a lot of information
print $q->p ('<a href="viewlogfiles?filename=qmail/current&matchPattern=&highlightPattern=">Review</a> qmail/current or
<a href="viewlogfiles?filename=qpsmtpd/current&matchPattern=&highlightPattern=">Review</a> qpsmtpd/current in the View log files panel.');
print $q->endform;
print $q->end_form;
print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . ""}, 'Return to main'), " ..."));
print $q->end_html;