torrux 4.x compat

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

diff --git a/torrus/perllib/Torrus/Renderer/Freeside.pm b/torrus/perllib/Torrus/Renderer/Freeside.pm
index 9a7c023..d97920e 100644 (file)
--- a/torrus/perllib/Torrus/Renderer/Freeside.pm
+++ b/torrus/perllib/Torrus/Renderer/Freeside.pm
@@ -3,7 +3,7 @@ package Torrus::Renderer::Freeside;
 use strict;
 use warnings;
 use base 'Torrus::Freeside';
-use FS::UID qw(cgisuidsetup);
+use FS::UID qw(setcgi adminsuidsetup);
 use FS::TicketSystem;
 
 our $cgi = '';
@@ -15,7 +15,9 @@ sub freesideSetup {
 
   $cgi = $Torrus::CGI::q;
 
-  cgisuidsetup($cgi);
+  setcgi($cgi);
+
+  adminsuidsetup;
   FS::TicketSystem->init();
 
 }