diff options
| -rw-r--r-- | FS/FS/ClientAPI/MyAccount/quotation.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/FS/FS/ClientAPI/MyAccount/quotation.pm b/FS/FS/ClientAPI/MyAccount/quotation.pm index ce2debdde..90c2acebb 100644 --- a/FS/FS/ClientAPI/MyAccount/quotation.pm +++ b/FS/FS/ClientAPI/MyAccount/quotation.pm @@ -136,7 +136,10 @@ sub quotation_add_pkg { my $part_pkg = FS::part_pkg->by_key($pkgpart); - if (!$part_pkg or !$allowed_pkgpart->{$pkgpart}) { + if (!$part_pkg or + (!$allowed_pkgpart->{$pkgpart} and + $cust_main->agentnum != ($part_pkg->agentnum || 0)) + ) { warn "disallowed quotation_pkg pkgpart $pkgpart\n" if $DEBUG; return { 'error' => "unknown package $pkgpart" }; |