blob: db264ea86a9cb3be02ca0e1d3f4437b30df64144 (
plain)
1
2
3
4
5
6
7
8
9
10
|
#!/usr/bin/perl
use FS::UID qw(adminsuidsetup);
use FS::Setup qw(enable_encryption);
my $user = shift or die "Usage: enable-encryption user\n";
adminsuidsetup $user;
enable_encryption;
|