price plan uI!

diff --git a/htetc/global.asa b/htetc/global.asa
index 00c6852..cb2a280 100644 (file)
--- 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 b6f6c69..a06ebb1 100644 (file)
--- 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;