initial commit of file from CVS for e-smith-base on Thu 26 Oct 11:24:52 BST 2023

This commit is contained in:
2023-10-26 11:24:52 +01:00
parent bbc22988a8
commit 9510d1a360
678 changed files with 22721 additions and 2 deletions

View File

@@ -0,0 +1,11 @@
{
use esmith::ConfigDB;
my $conf = esmith::ConfigDB->open_ro() or return;
my $pw_set = $conf->get_value("PasswordSet") || "no";
my $admin = $DB->get('admin') || return;
$admin->set_prop('PasswordSet', $pw_set);
}