* Mon Jun 09 2025 Jean-Philippe Pialasse <jpp@koozali.org> 11.0.0-87.sme
- add datetime getYear_list [SME: 13031] - WIP use esmith::*DB::UTF8 to access db flat files [SME: 13027]
This commit is contained in:
@@ -8,6 +8,8 @@ use Mojo::Base 'Mojolicious::Controller';
|
||||
use Locale::gettext;
|
||||
use SrvMngr::I18N;
|
||||
use SrvMngr qw(theme_list init_session);
|
||||
use esmith::ConfigDB::UTF8 qw(open_ro);
|
||||
use esmith::AccountsDB::UTF8 qw(open_ro);
|
||||
|
||||
# retrieve a configuration db record
|
||||
sub getconfig {
|
||||
@@ -16,8 +18,7 @@ sub getconfig {
|
||||
$c->app->log->info($c->log_req . ' ' . $key);
|
||||
|
||||
if ($key) {
|
||||
use esmith::ConfigDB qw(open_ro);
|
||||
my $cdb = esmith::ConfigDB->open_ro;
|
||||
my $cdb = esmith::ConfigDB::UTF8->open_ro;
|
||||
return getdb($c, $cdb, $key);
|
||||
} ## end if ($key)
|
||||
} ## end sub getconfig
|
||||
@@ -29,8 +30,7 @@ sub getaccount {
|
||||
$c->app->log->info($c->log_req . ' ' . $key);
|
||||
|
||||
if ($key) {
|
||||
use esmith::AccountsDB qw(open_ro);
|
||||
my $adb = esmith::AccountsDB->open_ro;
|
||||
my $adb = esmith::AccountsDB::UTF8->open_ro;
|
||||
return getdb($c, $adb, $key);
|
||||
} ## end if ($key)
|
||||
} ## end sub getaccount
|
||||
|
Reference in New Issue
Block a user