X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=torrus%2Fperllib%2FTorrus%2FFreeside.pm;h=239f55f1a81bf7752f03de34b052dca8b26a5a5d;hb=HEAD;hp=1b0a2812258067326e5f2a1a693567beae2564e2;hpb=c2b8ba62dc2bc84a9294d9baa626f8feec5eaa85;p=freeside.git

diff --git a/torrus/perllib/Torrus/Freeside.pm b/torrus/perllib/Torrus/Freeside.pm
index 1b0a28122..239f55f1a 100644
--- a/torrus/perllib/Torrus/Freeside.pm
+++ b/torrus/perllib/Torrus/Freeside.pm
@@ -5,8 +5,7 @@ use warnings;
 
 #Freeside
 use FS::Mason qw( mason_interps );
-use FS::UID qw(cgisuidsetup);
-use FS::TicketSystem;
+use FS::NetworkMonitoringSystem;
 
 my $outbuf;
 my( $fs_interp, $rt_interp ) = mason_interps('standalone', 'outbuf'=>\$outbuf);
@@ -49,8 +48,7 @@ sub freesideComponent {
   $FS::Mason::Request::FSURL .= '/' unless $FS::Mason::Request::FSURL =~ /\/$/;
 #  $FS::Mason::Request::QUERY_STRING = $packet->{'query_string'} || '';
 
-  cgisuidsetup($Torrus::CGI::q);
-  FS::TicketSystem->init();
+  $self->freesideSetup;
 
   $outbuf = '';
   #$fs_interp->exec($comp, @args); #only FS for now alas...
@@ -62,5 +60,11 @@ sub freesideComponent {
 
 }
 
+sub load_nms {
+    my $self = shift;
+    my $nms = new FS::NetworkMonitoringSystem;
+    $nms;
+}
+
 1;