2 <% $contact->line |h %>
5 % if ( ! $cust_pkg->get('cancel')
6 % && $FS::CurrentUser::CurrentUser->access_right('Change customer package')
10 %#XXX ( <%pkg_change_contact_link($cust_pkg)%> )
11 %# % if ( $cust_pkg->contactnum ) {
12 %# ( <%edit_contact_link($cust_pkg->contactnum)%> )
18 my $conf = new FS::Conf;
21 my $cust_pkg = $opt{'cust_pkg'};
23 my $contact = $cust_pkg->pkg_contact;
25 sub pkg_change_contact_link {
27 my $pkgpart = $cust_pkg->pkgpart;
28 include( '/elements/popup_link-cust_pkg.html',
30 'action' => $p. "misc/change_pkg.cgi?contactnum=-1",
31 'label' => emt('Change contact'),
32 'actionlabel' => emt('Change'),
33 'cust_pkg' => $cust_pkg,
37 sub edit_contact_link {
38 my $contactnum = shift;
39 include( '/elements/popup_link.html',
40 'action' => $p. "edit/cust_contact.cgi?contactnum=$contactnum",
41 'label' => emt('Edit contact'),
42 'actionlabel' => emt('Edit'),