diff options
author | ivan <ivan> | 2009-02-22 08:41:28 +0000 |
---|---|---|
committer | ivan <ivan> | 2009-02-22 08:41:28 +0000 |
commit | 52b311cb03ee6714c2ea8d108efdfef86c2c3e1d (patch) | |
tree | 3b9d3118d29a1018c9d16375a1a7707b799b48bc /FS/FS/part_pkg.pm | |
parent | 8690a879634b3a9a90e00e4359b167967065c237 (diff) |
add agent type list to package def browse, RT#4880
Diffstat (limited to 'FS/FS/part_pkg.pm')
-rw-r--r-- | FS/FS/part_pkg.pm | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/FS/FS/part_pkg.pm b/FS/FS/part_pkg.pm index 3308ead..f7c56f3 100644 --- a/FS/FS/part_pkg.pm +++ b/FS/FS/part_pkg.pm @@ -560,6 +560,18 @@ packages. =cut +=item type_pkgs + +Returns all FS::type_pkgs objects (see L<FS::type_pkgs>) for this package +definition. + +=cut + +sub type_pkgs { + my $self = shift; + qsearch('type_pkgs', { 'pkgpart' => $self->pkgpart } ); +} + sub pkg_svc { my $self = shift; |