From f8e860c838ee6a59eaefe261fa629825ffbec422 Mon Sep 17 00:00:00 2001 From: ivan Date: Thu, 11 Oct 2001 17:46:00 +0000 Subject: [PATCH] price plan uI! --- htetc/global.asa | 4 +++- htetc/handler.pl | 2 ++ 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/htetc/global.asa b/htetc/global.asa index 00c6852fb..cb2a28037 100644 --- a/htetc/global.asa +++ b/htetc/global.asa @@ -1,11 +1,13 @@ use strict; use vars qw( $cgi $p ); use CGI; -use CGI::Carp qw(fatalsToBrowser); +#use CGI::Carp qw(fatalsToBrowser); use HTML::Entities; use FS::UID qw(cgisuidsetup dbh); use FS::Record qw(qsearch qsearchs fields); use FS::part_svc; +use FS::part_pkg; +use FS::pkg_svc; use FS::CGI qw(header menubar popurl table); sub Script_OnStart { diff --git a/htetc/handler.pl b/htetc/handler.pl index b6f6c6975..a06ebb180 100644 --- a/htetc/handler.pl +++ b/htetc/handler.pl @@ -60,6 +60,8 @@ sub handler use FS::UID qw(cgisuidsetup); use FS::Record qw(qsearch qsearchs fields); use FS::part_svc; + use FS::part_pkg; + use FS::pkg_svc; use FS::CGI qw(header menubar popurl table); $cgi = new CGI; -- 2.11.0