From 1a1f9d6bfe74adba7194f461f92d9f34047a2392 Mon Sep 17 00:00:00 2001 From: Brian Read Date: Wed, 8 Oct 2025 08:11:38 +0100 Subject: [PATCH] * Tue Oct 07 2025 Brian Read 1.4-32.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/qmh | 12 ++++++------ smeserver-qmHandle.spec | 5 ++++- 2 files changed, 10 insertions(+), 7 deletions(-) diff --git a/root/etc/e-smith/web/functions/qmh b/root/etc/e-smith/web/functions/qmh index 4cd923d..2bae34b 100755 --- a/root/etc/e-smith/web/functions/qmh +++ b/root/etc/e-smith/web/functions/qmh @@ -125,7 +125,7 @@ sub showInitial my $default_action = 'list-queues'; - print $q->startform( + print $q->start_form( -method => 'POST', -action => $q->url (-absolute => 1) ),"\n"; @@ -165,7 +165,7 @@ sub showInitial -default => 'perform' ),"\n"; - print $q->endform,"\n"; + print $q->end_form,"\n"; esmith::cgi::genFooter($fm); @@ -520,7 +520,7 @@ sub showDeleteMessageNumber ($) print $q->hidden (-name => 'msgid', -override => 1, -default => "$msgid"); print $q->hidden (-name => 'function', -override => 1, -default => 'delete-message-number'); print $q->hidden (-name => 'queue', -override => 1, -default => "$queuetype"); - print $q->endform; + print $q->end_form; esmith::cgi::genFooter ($q); return; @@ -555,7 +555,7 @@ sub showDeleteAltMessageNumber ($) print $q->hidden (-name => 'msgid', -override => 1, -default => "$msgid"); print $q->hidden (-name => 'function', -override => 1, -default => 'delete-message-number'); print $q->hidden (-name => 'queue', -override => 1, -default => "$queuetype"); - print $q->endform; + print $q->end_form; esmith::cgi::genFooter ($q); return; @@ -591,7 +591,7 @@ sub deleteMessageNumber ($) print $q->hidden (-name => 'state', -override => 1, -default => 'perform'); print $q->hidden (-name => 'function', -override => 1, -default => "$queuetype"); - print $q->endform; + print $q->end_form; esmith::cgi::genFooter ($q); return; @@ -626,7 +626,7 @@ sub deleteAltMessageNumber ($) print $q->hidden (-name => 'state', -override => 1, -default => 'perform'); print $q->hidden (-name => 'function', -override => 1, -default => "$queuetype"); - print $q->endform; + print $q->end_form; esmith::cgi::genFooter ($q); return; diff --git a/smeserver-qmHandle.spec b/smeserver-qmHandle.spec index a3307d2..0585c30 100644 --- a/smeserver-qmHandle.spec +++ b/smeserver-qmHandle.spec @@ -1,7 +1,7 @@ %define name smeserver-qmHandle Name: %{name} %define version 1.4 -%define release 31 +%define release 32 Version: %{version} Release: %{release}%{?dist} BuildArch: noarch @@ -29,6 +29,9 @@ A panel for managing the Qmail queues using qmHandle (http://sourceforge.net/projects/qmhandle) %changelog +* Tue Oct 07 2025 Brian Read 1.4-32.sme +- Apply change from startform to start_form and endform to end_form to CGI panels [SME: 12775-87] + * Mon Oct 06 2025 Brian Read 1.4-31.sme - Add UTF8 and avoid potential DB caching problems [SME: 13209]