X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=htetc%2Fglobal.asa;h=5553642230a3395fe3c9dc92607a14fbb55c3801;hb=0bdae1eced79650fd64c66cdf2107a8f2d0b9067;hp=4f1ca45d3842afeea14596610cb7f7f036166952;hpb=536d684c3e17375d45a5d62bc5d748fec0224860;p=freeside.git diff --git a/htetc/global.asa b/htetc/global.asa index 4f1ca45d3..555364223 100644 --- a/htetc/global.asa +++ b/htetc/global.asa @@ -1,6 +1,6 @@ -#BEGIN { eval "use Devel::AutoProfiler;"; } #only if installed... +BEGIN { eval "use Devel::AutoProfiler;"; } #only if installed... #BEGIN { package Devel::AutoProfiler; use vars qw(%caller_info); } -use Devel::AutoProfiler; +#use Devel::AutoProfiler; use strict; use vars qw( $cgi $p ); @@ -41,6 +41,7 @@ use FS::part_bill_event; use FS::part_pkg; use FS::part_referral; use FS::part_svc; +use FS::part_svc_router; use FS::pkg_svc; use FS::port; use FS::queue qw(joblisting); @@ -48,15 +49,15 @@ use FS::raddb; use FS::session; use FS::svc_acct; use FS::svc_acct_pop qw(popselector); -use FS::svc_acct_sm; use FS::svc_domain; use FS::svc_forward; use FS::svc_www; -use FS::ac_type; -use FS::ac; -use FS::part_ac_field; -use FS::ac_field; -use FS::ac_block; +use FS::router; +use FS::part_router_field; +use FS::router_field; +use FS::addr_block; +use FS::part_sb_field; +use FS::sb_field; use FS::svc_broadband; use FS::type_pkgs; use FS::part_export; @@ -125,7 +126,9 @@ sub Script_OnFlush { } } -if ( defined(@DBIx::Profile::ISA) && DBIx::Profile::db->can('sprintProfile') ) { +#if ( defined(@DBIx::Profile::ISA) && DBIx::Profile::db->can('sprintProfile') ) { +#if ( defined(@DBIx::Profile::ISA) && UNIVERSAL::can('DBIx::Profile::db', 'sprintProfile') ) { +if ( defined(@DBIx::Profile::ISA) ) { #warn "enabling profiling redirects"; *CGI::redirect = sub {