e-smith-manager/root/etc/e-smith/db/configuration/migrate/20TKTAuthSecret

8 lines
206 B
Plaintext
Raw Normal View History

{
my $admin = $DB->get('httpd-admin');
return unless $admin;
return if $admin->prop('TKTAuthSecret');
use Data::UUID;
$admin->set_prop('TKTAuthSecret', Data::UUID->new->create_str());
}