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

* Mon Oct 06 2025 Brian Read <brianr@koozali.org> 1.4-31.sme

Browse Source 
- Add UTF8 and avoid potential DB caching problems [SME: 13209]
This commit is contained in:
Brian Read
2025-10-06 11:30:01 +01:00
parent e702f5d2bc
commit 6fdbdbc1e8
2 changed files with 15 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
root/usr/share/smanager/lib/SrvMngr/Controller/Qmh.pm
View File

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

5
smeserver-qmHandle.spec
View File

@@ -1,7 +1,7 @@
%define name smeserver-qmHandle
Name: %{name}
%define version 1.4
%define release 30
%define release 31
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
* 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]