{ my $llng = $DB->get("lemonldap") || $DB->new_record("lemonldap", { type => "service" }); my @soapaccess = split(/[;,]/, ($llng->prop('SoapAllowFrom') || '')); my $internal = $DB->get('InternalInterface')->prop('IPAddress'); push @soapaccess, $internal if (!grep {$internal eq $_} @soapaccess); $llng->set_prop('SoapAllowFrom', join(',',@soapaccess)); # httpd-fpbx handler my @reload = split(/[;,]/, ($llng->prop('Reload') || '')); my $reloadurl = 'localhost:960=http://localhost:960/lm-reload'; push @reload, $reloadurl if (!grep {$reloadurl eq $_} @reload); $llng->set_prop('Reload', join(',',@reload)); }