% if ( $contact ) {
<% $contact->line |h %>
-% if ( $show_link ) {
+% if ( $show_change_link && ! $opt{no_links} ) {
<FONT SIZE=-1>
( <%pkg_change_contact_link($cust_pkg)%> )
</FONT>
-% }
-% } elsif ( $show_link ) {
+% }
+% if ( $show_detach_link && ! $opt{no_links} ) {
<FONT SIZE=-1>
- ( <%pkg_add_contact_link($cust_pkg)%> )
+ ( <%pkg_detach_link($cust_pkg)%> )
</FONT>
+% }
+ <BR>
% }
<%init>
-my $conf = new FS::Conf;
my %opt = @_;
my $cust_pkg = $opt{'cust_pkg'};
-my $show_link =
+my $show_change_link =
! $cust_pkg->get('cancel')
&& $FS::CurrentUser::CurrentUser->access_right('Change customer package');
+my $show_detach_link =
+ ! $cust_pkg->get('cancel')
+ && $FS::CurrentUser::CurrentUser->access_right('Detach customer package');
+
my $contact = $cust_pkg->contact_obj;
sub pkg_change_contact_link {
);
}
-sub pkg_add_contact_link {
+sub pkg_detach_link {
my $cust_pkg = shift;
#my $pkgpart = $cust_pkg->pkgpart;
include( '/elements/popup_link-cust_pkg.html',
- 'action' => $p. "misc/change_pkg_contact.html",
- 'label' => emt('Add contact'),
- 'actionlabel' => emt('Change'),
+ 'action' => $p. "misc/detach_pkg.html",
+ 'label' => emt('Detach'),
+ 'actionlabel' => emt('Detach'),
'cust_pkg' => $cust_pkg,
'width' => 616,
- 'height' => 192,
+ 'height' => 720,
);
}