fix torrus interface slowness resulting from initializing FS for every component...

[freeside.git] / torrus / perllib / Torrus / ReportOutput / Freeside.pm

diff --git a/torrus/perllib/Torrus/ReportOutput/Freeside.pm b/torrus/perllib/Torrus/ReportOutput/Freeside.pm
index 47db28d..f04ac61 100644 (file)
--- a/torrus/perllib/Torrus/ReportOutput/Freeside.pm
+++ b/torrus/perllib/Torrus/ReportOutput/Freeside.pm
@@ -6,9 +6,13 @@ 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();