From: ivan <ivan>
Date: Thu, 11 Oct 2001 17:46:00 +0000 (+0000)
Subject: price plan uI!
X-Git-Tag: freeside_1_4_0pre11~285
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=f8e860c838ee6a59eaefe261fa629825ffbec422;p=freeside.git

price plan uI!
---

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;