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,19 @@
{
my $AccessType = $DB->get('AccessType');
my $DialupUserAccount = $DB->get('DialupUserAccount');
my $SystemName = $DB->get('SystemName');
return unless ($AccessType && $DialupUserAccount && $SystemName);
if ($AccessType->value eq 'dedicated'
&& $DialupUserAccount->value eq 'useraccount'
&& $SystemName->value ne 'e-smith')
{
# Heuristic to migrate DHCP client identifier - we used to use SystemName
# and now we use DialupUserAccount
# So we migrate SystemName to DialupUserAccount, unless DialupUserAccount
# is already set, or the SystemName appears not set (default setting)
$DialupUserAccount->merge_props(type => $SystemName->value);
}
}