From 37d0fe4165cbfaf57d82f3aff926508d565759f6 Mon Sep 17 00:00:00 2001 From: Mark Wells Date: Sun, 26 Apr 2015 23:26:50 -0700 Subject: [PATCH] allow all legal packages to be chosen in selfservice quotations --- FS/FS/ClientAPI/MyAccount/quotation.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) 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" }; -- 2.11.0