From: ivan Date: Sat, 5 Feb 2011 06:25:56 +0000 (+0000) Subject: fix cpu/mem sucking when service labels are very long, RT#11452 X-Git-Tag: freeside_2_3_0~641 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=95bea5564bc06ae02aa351bc1da43308e0f777d9 fix cpu/mem sucking when service labels are very long, RT#11452 --- diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm index c183a4938..b3ed2f29a 100644 --- a/FS/FS/cust_pkg.pm +++ b/FS/FS/cust_pkg.pm @@ -2195,7 +2195,8 @@ sub _labels_short { while ( @values ) { my $detail = "$label: "; $detail .= shift(@values). ', ' - while @values && length($detail.$values[0]) < 78; + while @values + && ( length($detail.$values[0]) < 78 || $detail eq "$label: " ); $detail =~ s/, $//; push @labels, $detail; }