freeside/FS/FS part_pkg.pm,1.14.2.8,1.14.2.9

[ivan]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory pouncequick:/tmp/cvs-serv20661

Modified Files:
      Tag: FREESIDE_1_4_BRANCH
	part_pkg.pm 
Log Message:
initialize debug flag

Index: part_pkg.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_pkg.pm,v
retrieving revision 1.14.2.8
retrieving revision 1.14.2.9
diff -u -d -r1.14.2.8 -r1.14.2.9
--- part_pkg.pm	26 Nov 2004 08:51:59 -0000	1.14.2.8
+++ part_pkg.pm	24 Dec 2004 03:35:26 -0000	1.14.2.9
@@ -1,7 +1,7 @@
 package FS::part_pkg;
 
 use strict;
-use vars qw( @ISA );
+use vars qw( @ISA $DEBUG );
 use FS::Record qw( qsearch dbh dbdef );
 use FS::pkg_svc;
 use FS::part_svc;
@@ -11,6 +11,8 @@
 use FS::Conf;
 
 @ISA = qw( FS::Record );
+
+$DEBUG = 0;
 
 =head1 NAME