projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
credit sources, RT#28917
[freeside.git]
/
FS
/
FS
/
part_pkg_usage.pm
diff --git
a/FS/FS/part_pkg_usage.pm
b/FS/FS/part_pkg_usage.pm
index
99014d3
..
b19c63d
100644
(file)
--- a/
FS/FS/part_pkg_usage.pm
+++ b/
FS/FS/part_pkg_usage.pm
@@
-1,8
+1,7
@@
package FS::part_pkg_usage;
package FS::part_pkg_usage;
+use base qw( FS::m2m_Common FS::Record );
use strict;
use strict;
-use base qw( FS::m2m_Common FS::Record );
-use FS::Record qw( qsearch qsearchs );
use Scalar::Util qw(blessed);
=head1 NAME
use Scalar::Util qw(blessed);
=head1 NAME
@@
-117,7
+116,7
@@
sub check {
my $error =
$self->ut_numbern('pkgusagepart')
|| $self->ut_foreign_key('pkgpart', 'part_pkg', 'pkgpart')
my $error =
$self->ut_numbern('pkgusagepart')
|| $self->ut_foreign_key('pkgpart', 'part_pkg', 'pkgpart')
- || $self->ut_
number
('minutes')
+ || $self->ut_
float
('minutes')
|| $self->ut_numbern('priority')
|| $self->ut_flag('shared')
|| $self->ut_flag('rollover')
|| $self->ut_numbern('priority')
|| $self->ut_flag('shared')
|| $self->ut_flag('rollover')
@@
-138,10
+137,7
@@
pool.
sub classnums {
my $self = shift;
if (!$self->get('classnums')) {
sub classnums {
my $self = shift;
if (!$self->get('classnums')) {
- my $classnums = [
- map { $_->classnum }
- qsearch('part_pkg_usage_class', { 'pkgusagepart' => $self->pkgusagepart })
- ];
+ my $classnums = [ map { $_->classnum } $self->part_pkg_usage_class ];
$self->set('classnums', $classnums);
}
@{ $self->get('classnums') };
$self->set('classnums', $classnums);
}
@{ $self->get('classnums') };