* Tue Oct 07 2025 Brian Read <brianr@koozali.org> 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

@@ -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;

root/usr/share/smanager/lib/SrvMngr/Controller/Qmh.pm

@@ -18,19 +18,20 @@ use warnings;
 use Mojo::Base 'Mojolicious::Controller';
 
 use esmith::FormMagick qw(gen_locale_date_string);
-use esmith::ConfigDB;
+use esmith::ConfigDB::UTF8;
 
 use Locale::gettext;
 use SrvMngr::I18N;
 
 use SrvMngr qw(theme_list init_session);
 
-our $cdb = esmith::ConfigDB->open() || die 'Cannot open configuration base';
+my $cdb;
 
 sub main {
 
     my $c = shift;
     $c->app->log->info($c->log_req);
+	$cdb = esmith::ConfigDB::UTF8->open() || die 'Cannot open configuration base';
 
     my %qmh_datas = ();
     my $title = $c->l('qmh_QMH_TITLE');
@@ -47,6 +48,7 @@ sub do_update {
 
     my $c = shift;
     $c->app->log->info($c->log_req);
+	$cdb = esmith::ConfigDB::UTF8->open() || die 'Cannot open configuration base';
 
     my %qmh_datas = ();
     my $result = "";
@@ -118,6 +120,7 @@ sub do_update {
 sub reportType_list {
 
     my $c = shift;
+	$cdb = esmith::ConfigDB::UTF8->open() || die 'Cannot open configuration base';
 
     my $rec = $cdb->get('altqmail');
     my $altqmail = ($cdb->get('altqmail')->value || 0) if $rec;
@@ -145,6 +148,7 @@ sub reportType_list {
 sub showListQueues {
 
     my ($c, $altq) = @_;
+	$cdb = esmith::ConfigDB::UTF8->open() || die 'Cannot open configuration base';
 
     my $out = '';
     my $reporttype = 'list-queues';
@@ -174,6 +178,7 @@ sub showListQueues {
 sub showListLocalQueue {
 
     my ($c, $altq) = @_;
+	$cdb = esmith::ConfigDB::UTF8->open() || die 'Cannot open configuration base';
 
     my $out = '';
     my $reporttype = 'list-local-queue';
@@ -203,6 +208,7 @@ sub showListLocalQueue {
 sub showListRemoteQueue {
 
     my ($c, $altq) = @_;
+	$cdb = esmith::ConfigDB::UTF8->open() || die 'Cannot open configuration base';
 
     my $out = '';
     my $reporttype = 'list-remote-queue';
@@ -232,6 +238,7 @@ sub showListRemoteQueue {
 sub resend {
 
     my ($c, $altq) = @_;
+	$cdb = esmith::ConfigDB::UTF8->open() || die 'Cannot open configuration base';
 
     my $out = '';
     my $reporttype = 'resend';
@@ -279,6 +286,7 @@ sub AddLinks {
 sub showDeleteMessageNumber {
 
     my ($c, $msgid, $altq, $reporttype) = @_;
+	$cdb = esmith::ConfigDB::UTF8->open() || die 'Cannot open configuration base';
 
     if ($msgid =~ /^(\d+)$/) {
        $msgid = $1;
@@ -326,4 +334,4 @@ sub deleteMessageNumber {
 }
 
 
-1;
+1;

smeserver-qmHandle.spec

@@ -1,7 +1,7 @@
 %define name smeserver-qmHandle
 Name: %{name}
 %define version 1.4
-%define release 29
+%define release 32
 Version: %{version}
 Release: %{release}%{?dist}
 BuildArch:     noarch
@@ -29,6 +29,15 @@ A panel for managing the Qmail queues using qmHandle
 (http://sourceforge.net/projects/qmhandle)
 
 %changelog
+* Tue Oct 07 2025 Brian Read <brianr@koozali.org> 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 <brianr@koozali.org> 1.4-31.sme
+- Add UTF8 and avoid potential DB caching problems [SME: 13209]
+
+* Sat Oct 04 2025 Brian Read <brianr@koozali.org> 1.4-30.sme
+- Remove smanager-refresh from spec file [SME: 13212]
+
 * Tue Sep 23 2025 Brian Read <brianr@koozali.org> 1.4-29.sme
 - Change $config to config in layout file(s) [SME: 13171]
 
@@ -143,10 +152,6 @@ rm -rf $RPM_BUILD_ROOT
 
 #/etc/e-smith/events/actions/navigation-conf >/dev/null 2>&1
 
-if (systemctl list-unit-files |grep smanager) then
-  echo "Smanager restart in spec file"
-  /sbin/e-smith/signal-event smanager-refresh;
-fi
 
 
 %preun