diff options
author | ivan <ivan> | 2004-07-10 14:31:00 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-07-10 14:31:00 +0000 |
commit | 6c420cf8a5f93e425840c0cb8ba841affa081f76 (patch) | |
tree | d76ac450503a19357b779e1afe585510fc3922eb /FS/FS/part_pkg.pm | |
parent | 7048244d5fe7aee28456edc039406eb6f75186e4 (diff) |
tyop;
Diffstat (limited to 'FS/FS/part_pkg.pm')
-rw-r--r-- | FS/FS/part_pkg.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/FS/FS/part_pkg.pm b/FS/FS/part_pkg.pm index dcce66b38..df1f02e46 100644 --- a/FS/FS/part_pkg.pm +++ b/FS/FS/part_pkg.pm @@ -262,7 +262,9 @@ definition (with non-zero quantity). sub pkg_svc { my $self = shift; - grep { $_->quantity } qsearch( 'pkg_svc', { 'pkgpart' => $self->pkgpart } ); + #sort { $b->primary cmp $a->primary } + grep { $_->quantity } + qsearch( 'pkg_svc', { 'pkgpart' => $self->pkgpart } ); } =item svcpart [ SVCDB ] |