From b0f71b04f815d2eee4525521eb895bc59bba9426 Mon Sep 17 00:00:00 2001 From: Brian Read Date: Wed, 8 Oct 2025 06:49:09 +0100 Subject: [PATCH] * Tue Oct 07 2025 Brian Read 1.3-8.sme - Apply change from startform to start_form and endform to end_form to CGI panels [SME: 12775-87] --- root/etc/e-smith/web/functions/user-email | 30 +++++++++++------------ smeserver-email-management.spec | 5 +++- 2 files changed, 19 insertions(+), 16 deletions(-) diff --git a/root/etc/e-smith/web/functions/user-email b/root/etc/e-smith/web/functions/user-email index 03654a7..2cbb5c3 100755 --- a/root/etc/e-smith/web/functions/user-email +++ b/root/etc/e-smith/web/functions/user-email @@ -527,7 +527,7 @@ sub showInitial ($$) print ''; } - 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 ''; @@ -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 ''; @@ -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 ''; @@ -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 ''; @@ -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 ('configure 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 ''; @@ -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 ''; @@ -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 ('Review qmail/current or Review 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; diff --git a/smeserver-email-management.spec b/smeserver-email-management.spec index 2136275..4876730 100644 --- a/smeserver-email-management.spec +++ b/smeserver-email-management.spec @@ -6,7 +6,7 @@ Summary: modify and monitor maildelivery for all users %define name smeserver-email-management Name: %{name} %define version 1.3 -%define release 7 +%define release 8 Version: %{version} Release: %{release}%{?dist} License: GPL @@ -62,6 +62,9 @@ echo "%doc COPYING" >> %{name}-%{version}-filelist %defattr(-,root,root) %changelog +* Tue Oct 07 2025 Brian Read 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 1.3-7.sme - Fix e-smith references in smeserver-email-management [SME: 12732]