FS/FS/part_export/communigate_pro_singledomain.pm

   1 package FS::part_export::communigate_pro_singledomain;
   2
   3 use vars qw(@ISA);
   4 use FS::part_export::communigate_pro;
   5
   6 @ISA = qw(FS::part_export::communigate_pro);
   7
   8 sub export_username {
   9   my($self, $svc_acct) = (shift, shift);
  10   $svc_acct->username. '@'. $self->option('domain');
  11 }