[freeside-commits] freeside/FS/FS part_pkg.pm,1.94,1.95

[Ivan,,,]

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

Modified Files:
	part_pkg.pm 
Log Message:
fix upgrade issue w/ black part_pkg.comment, RT#3988

Index: part_pkg.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_pkg.pm,v
retrieving revision 1.94
retrieving revision 1.95
diff -u -d -r1.94 -r1.95
--- part_pkg.pm	22 Jun 2009 10:45:26 -0000	1.94
+++ part_pkg.pm	24 Jun 2009 04:42:14 -0000	1.95
@@ -1281,6 +1281,7 @@
     $new->custom('Y');
     my $comment = $part_pkg->comment;
     $comment =~ s/^\(CUSTOM\) //;
+    $comment = '(none)' unless $comment =~ /\S/;
     $new->comment($comment);
 
     my $pkg_svc = { map { $_->svcpart => $_->quantity } $part_pkg->pkg_svc };