smecontribs/smeserver-email-management
6
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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

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

30
root/etc/e-smith/web/functions/user-email
View File

@@ -527,7 +527,7 @@ sub showInitial ($$)
print '</table>'; print '</table>';
} }
print $q->endform; print $q->end_form;
print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org", print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ...")); $q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print '</FONT>'; print '</FONT>';
@@ -554,7 +554,7 @@ sub showEdit ($)
esmith::cgi::genHeaderNonCacheable esmith::cgi::genHeaderNonCacheable
($q, \%conf, 'Add or modify a Global procmail rule.'); ($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)); -action => $q->url (-absolute => 1));
print $q->table ({border => 0, cellspacing => 0, cellpadding => 4}, 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 => 'pmRule', -override => 1, -default => $pmRule);
print $q->hidden (-name => 'oldpmRule', -override => 1, -default => $oldpmRule); 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", print $q->p ($q->hr, $q->font ({size => "-1"}, "dungog.net/wiki",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ...")); $q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print '</FONT>'; print '</FONT>';
@@ -652,7 +652,7 @@ sub showGroup ($$)
esmith::cgi::genHeaderNonCacheable ($q, \%conf, 'Group mail Settings'); esmith::cgi::genHeaderNonCacheable ($q, \%conf, 'Group mail Settings');
print $q->startform (-method => 'POST', print $q->start_form (-method => 'POST',
-action => $q->url (-absolute => 1)); -action => $q->url (-absolute => 1));
print $q->h4 ("Group Mail settings - $group"); 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 => 'state', -override => 1, -default => 'performGroup');
print $q->hidden (-name => 'group', -override => 1, -default => $group); 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", print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ...")); $q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print '</FONT>'; print '</FONT>';
@@ -708,7 +708,7 @@ sub showGlobalEnable ($$)
esmith::cgi::genHeaderNonCacheable ($q, \%conf, 'Global Settings'); esmith::cgi::genHeaderNonCacheable ($q, \%conf, 'Global Settings');
print $q->startform (-method => 'POST', print $q->start_form (-method => 'POST',
-action => $q->url (-absolute => 1)); -action => $q->url (-absolute => 1));
print $q->h4 ('Zarafa'); print $q->h4 ('Zarafa');
@@ -924,7 +924,7 @@ sub showGlobalEnable ($$)
-override => 1, -override => 1,
-default => 'globalSave'); -default => 'globalSave');
print $q->endform; print $q->end_form;
print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org", print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ...")); $q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print '</FONT>'; print '</FONT>';
@@ -1118,7 +1118,7 @@ sub showEnableProc ($$$)
print $q->hr; print $q->hr;
} }
print $q->startform print $q->start_form
(-method => 'POST', -action => $q->url (-absolute => 1)); (-method => 'POST', -action => $q->url (-absolute => 1));
#get username from param, acctName is from deleteSingle #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->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", print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ...")); $q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print '</FONT>'; print '</FONT>';
@@ -1494,7 +1494,7 @@ sub showAdvancedRuleEdit ($)
esmith::cgi::genHeaderNonCacheable esmith::cgi::genHeaderNonCacheable
($q, \%conf, 'Add or modify a users mail rule.'); ($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)); -action => $q->url (-absolute => 1));
print $q->table ({border => 0, cellspacing => 0, cellpadding => 4}, 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 => 'oldpmRule', -override => 1, -default => $oldpmRule);
print $q->hidden (-name => 'acctName', -override => 1, -default => $acctName2); 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", print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ...")); $q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print '</FONT>'; print '</FONT>';
@@ -1832,7 +1832,7 @@ sub performViewlog ($)
esmith::cgi::genHeaderNonCacheable esmith::cgi::genHeaderNonCacheable
($q, \%conf, "$acct $file"); ($q, \%conf, "$acct $file");
print $q->startform (-method => 'POST', print $q->start_form (-method => 'POST',
-action => $q->url (-absolute => 1)); -action => $q->url (-absolute => 1));
print $q->table ({border => 0, cellspacing => 0, cellpadding => 4}); 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", print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ...")); $q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Email help'), " ..."));
print $q->end_html; print $q->end_html;
@@ -1885,7 +1885,7 @@ sub showHelp ($)
esmith::cgi::genHeaderNonCacheable esmith::cgi::genHeaderNonCacheable
($q, \%conf, 'Email Help'); ($q, \%conf, 'Email Help');
print $q->startform (-method => 'POST', print $q->start_form (-method => 'POST',
-action => $q->url (-absolute => 1)); -action => $q->url (-absolute => 1));
print $q->table ({border => 0, cellspacing => 0, cellpadding => 4}, 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 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.'); <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", print $q->p ($q->hr, $q->font ({size => "-1"}, "https://wiki.koozali.org",
$q->a ({href => $q->url (-absolute => 1) . ""}, 'Return to main'), " ...")); $q->a ({href => $q->url (-absolute => 1) . ""}, 'Return to main'), " ..."));
print $q->end_html; print $q->end_html;

5
smeserver-email-management.spec
View File

@@ -6,7 +6,7 @@ Summary: modify and monitor maildelivery for all users
%define name smeserver-email-management %define name smeserver-email-management
Name: %{name} Name: %{name}
%define version 1.3 %define version 1.3
%define release 7 %define release 8
Version: %{version} Version: %{version}
Release: %{release}%{?dist} Release: %{release}%{?dist}
License: GPL License: GPL
@@ -62,6 +62,9 @@ echo "%doc COPYING" >> %{name}-%{version}-filelist
%defattr(-,root,root) %defattr(-,root,root)
%changelog %changelog
* 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]
* Sun Sep 08 2024 fix-e-smith-pkg.sh by Trevor Batley <trevor@batley.id.au> 1.3-7.sme * Sun Sep 08 2024 fix-e-smith-pkg.sh by Trevor Batley <trevor@batley.id.au> 1.3-7.sme
- Fix e-smith references in smeserver-email-management [SME: 12732] - Fix e-smith references in smeserver-email-management [SME: 12732]