From: Ivan Kohler <ivan@freeside.biz>
Date: Fri, 22 Mar 2013 17:38:20 +0000 (-0700)
Subject: cleanup
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=26bc6f249a1cdb165bf9b0d0fa3fc055ed457723

cleanup
---

diff --git a/FS/FS/part_pkg/flat_introrate.pm b/FS/FS/part_pkg/flat_introrate.pm
index 10c205609..733760276 100644
--- a/FS/FS/part_pkg/flat_introrate.pm
+++ b/FS/FS/part_pkg/flat_introrate.pm
@@ -1,12 +1,8 @@
 package FS::part_pkg::flat_introrate;
+use base qw( FS::part_pkg::flat );
 
 use strict;
-use vars qw(@ISA %info $DEBUG $me);
-use FS::part_pkg::flat;
-
-@ISA = qw(FS::part_pkg::flat);
-$me = '[' . __PACKAGE__ . ']';
-$DEBUG = 0;
+use vars qw( %info );
 
 %info = (
   'name' => 'Introductory price for X months, then flat rate,'.