%
% if ( $curuser->access_right('Customize customer package') ) {
% $br=1;
- ( <%pkg_customize_link($cust_pkg,$cust_pkg->custnum)%> )
+ ( <%pkg_customize_link($cust_pkg,$part_pkg)%> )
% }
%
<% $br ? '<BR>' : '' %>
sub pkg_customize_link {
my $cust_pkg = shift or return '';
+ my $part_pkg = shift;
my $custnum = $cust_pkg->custnum;
qq!<A HREF="${p}edit/part_pkg.cgi?!.
- "clone=". $cust_pkg->part_pkg->pkgpart. ';'.
+ "clone=". $part_pkg->pkgpart. ';'.
"pkgnum=". $cust_pkg->pkgnum.
qq!">Customize</A>!;
}