torrus/perllib/Torrus/ReportOutput/Freeside.pm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

package Torrus::ReportOutput::Freeside;

use strict;
use warnings;
use base 'Torrus::Freeside';
use FS::UID qw(adminsuidsetup);
use FS::TicketSystem;

our $issetup = 0;

sub freesideSetup {
  #my $self = shift;

  return if $issetup++;

  adminsuidsetup('fs_queue'); #XXX for now
  FS::TicketSystem->init();

}

1;