From: ivan <ivan>
Date: Wed, 24 Jun 2009 04:42:14 +0000 (+0000)
Subject: fix upgrade issue w/ black part_pkg.comment, RT#3988
X-Git-Tag: root_of_svc_elec_features~1099
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=0ab909de22a43fc86e581e50d60f786ce2d5f8d6

fix upgrade issue w/ black part_pkg.comment, RT#3988
---

diff --git a/FS/FS/part_pkg.pm b/FS/FS/part_pkg.pm
index 1ea941fd6..ba80475eb 100644
--- a/FS/FS/part_pkg.pm
+++ b/FS/FS/part_pkg.pm
@@ -1281,6 +1281,7 @@ sub _upgrade_data { # class method
     $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 };