enable-encryption

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