diff options
Diffstat (limited to 'FS/FS/reg_code_pkg.pm')
-rw-r--r-- | FS/FS/reg_code_pkg.pm | 14 |
1 files changed, 1 insertions, 13 deletions
diff --git a/FS/FS/reg_code_pkg.pm b/FS/FS/reg_code_pkg.pm index 837b755..f438f67 100644 --- a/FS/FS/reg_code_pkg.pm +++ b/FS/FS/reg_code_pkg.pm @@ -1,12 +1,7 @@ package FS::reg_code_pkg; +use base qw(FS::Record); use strict; -use vars qw( @ISA ); -use FS::Record qw(qsearchs); -use FS::reg_code; -use FS::part_pkg; - -@ISA = qw(FS::Record); =head1 NAME @@ -115,13 +110,6 @@ sub check { Returns the package definition (see L<FS::part_pkg>) -=cut - -sub part_pkg { - my $self = shift; - qsearchs('part_pkg', { 'pkgpart' => $self->pkgpart } ); -} - =back =head1 BUGS |