From df676d82034cb63ff357f8d8ed0f95ce788fb98b Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Mon, 9 Feb 2009 01:49:28 +0000
Subject: further work on agents editing own packages: fix fallout on package
 customization from turning agent_virt on in edit/part_pkg.cgi, add a "clone
 package" to package browse, like clone service, and have agent type selection
 disappear when you set an agentnum.  RT#1331

---
 httemplate/elements/select-part_pkg.html | 16 +---------------
 1 file changed, 1 insertion(+), 15 deletions(-)

(limited to 'httemplate/elements/select-part_pkg.html')

diff --git a/httemplate/elements/select-part_pkg.html b/httemplate/elements/select-part_pkg.html
index cd6d24c28..52b1ccaf1 100644
--- a/httemplate/elements/select-part_pkg.html
+++ b/httemplate/elements/select-part_pkg.html
@@ -33,20 +33,6 @@ my( %opt ) = @_;
 $opt{'records'} = delete $opt{'part_pkg'}
   if $opt{'part_pkg'};
 
-#false laziness w/browse/part_pkg.cgi
-my $agentnums = join(',', $FS::CurrentUser::CurrentUser->agentnums);
-
-$opt{'extra_sql'} .=
-  " AND ( agentnum IS NOT NULL
-          OR 0 < ( SELECT COUNT(*)
-                     FROM type_pkgs
-                       LEFT JOIN agent_type USING ( typenum )
-                       LEFT JOIN agent AS typeagent USING ( typenum )
-                     WHERE type_pkgs.pkgpart = part_pkg.pkgpart
-                       AND typeagent.agentnum IN ($agentnums)
-                 )
-        )
-  ";
-#eofalse
+$opt{'extra_sql'} .= ' AND '. FS::part_pkg->curuser_pkgs_sql;
 
 </%init>
-- 
cgit v1.2.1