X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fview%2Fcust_main.cgi;h=0610bc324004b67d58f33a749d99bdd5e342e053;hb=c1e33a61324f4e06157c522af7882a97a021830f;hp=7d2d873151eecc9fe2ca6d7f5958f425bf47014b;hpb=bd3a0f6ac3ce9370ee13b9c325e137e2ab533fce;p=freeside.git

diff --git a/httemplate/view/cust_main.cgi b/httemplate/view/cust_main.cgi
index 7d2d87315..0610bc324 100755
--- a/httemplate/view/cust_main.cgi
+++ b/httemplate/view/cust_main.cgi
@@ -299,6 +299,10 @@ function cust_pkg_areyousure(href) {
     if (confirm("Permanently delete included services and cancel this package?") == true)
         window.location.href = href;
 }
+function svc_areyousure(href) {
+    if (confirm("Permanently unprovision and delete this service?") == true)
+        window.location.href = href;
+}
 </SCRIPT>
 END
 
@@ -401,6 +405,7 @@ foreach my $package (@packages) {
   #foreach my $cust_svc ( @cust_svc ) {
   foreach my $svcpart ( sort { $a<=>$b } keys %pkg_svc ) {
     my $svc = qsearchs('part_svc',{'svcpart'=>$svcpart})->getfield('svc');
+    $svc =~ s/ /&nbsp;/g;
     my(@cust_svc)=qsearch('cust_svc',{'pkgnum'=>$pkgnum, 
                                       'svcpart'=>$svcpart,
                                     });
@@ -411,13 +416,13 @@ foreach my $package (@packages) {
         my($svcnum) = $cust_svc->svcnum;
         my($sview) = popurl(2). "view";
         print $n2,qq!<TD><A HREF="$sview/$svcdb.cgi?$svcnum"><FONT SIZE=-1>$label</FONT></A></TD>!,
-              qq!<TD><A HREF="$sview/$svcdb.cgi?$svcnum"><FONT SIZE=-1>$value</FONT></A></TD>!;
+              qq!<TD><FONT SIZE=-1><A HREF="$sview/$svcdb.cgi?$svcnum">$value</A><BR>(&nbsp;<A HREF="javascript:svc_areyousure('${p}misc/unprovision.cgi?$svcnum')">Unprovision</A>&nbsp;)</FONT></TD>!;
       } else {
         print $n2, qq!<TD COLSPAN=2><A HREF="$uiadd{$svcpart}?pkgnum$pkgnum-svcpart$svcpart"><b><font size="+1" color="#ff0000">!.
-              qq!Provision $svc</A></b></font>!;
+              qq!Provision&nbsp;$svc</A></b></font>!;
 
         print qq!<BR><A HREF="../misc/link.cgi?pkgnum$pkgnum-svcpart$svcpart">!.
-              qq!<b><font size="+1" color="#ff0000">Link to legacy $svc</A></b></font>!
+              qq!<b><font size="+1" color="#ff0000">Link&nbsp;to&nbsp;legacy&nbsp;$svc</A></b></font>!
           if $conf->exists('legacy_link');
 
         print '</TD>';