[freeside-commits] freeside/FS/FS cust_pkg.pm,1.184,1.185

Erik Levinson levinse at wavetail.420.am
Mon Dec 20 22:26:13 PST 2010


Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv32090/FS/FS

Modified Files:
	cust_pkg.pm 
Log Message:
self-service improvements: DIDs, RT10885

Index: cust_pkg.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_pkg.pm,v
retrieving revision 1.184
retrieving revision 1.185
diff -u -w -d -r1.184 -r1.185
--- cust_pkg.pm	9 Dec 2010 19:26:19 -0000	1.184
+++ cust_pkg.pm	21 Dec 2010 06:26:11 -0000	1.185
@@ -1746,6 +1746,13 @@
           my $part_svc = $_->part_svc;
           $part_svc->{'Hash'}{'num_avail'} = #evil encapsulation-breaking
             $_->quantity - $self->num_cust_svc($_->svcpart);
+
+	  # more evil encapsulation breakage
+	  if($part_svc->{'Hash'}{'num_avail'} > 0) {
+	    my @exports = $part_svc->part_export_did;
+	    $part_svc->{'Hash'}{'can_get_dids'} = scalar(@exports);
+	  }
+
           $part_svc;
         }
       $self->part_pkg->pkg_svc;



More information about the freeside-commits mailing list