X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_pkg.pm;h=1dfa1ef03f8958b436fde7f5298ecaf56596eae9;hb=b49c1bd5510a5f10b05bffacc6cc8b6a1b2153e8;hp=9f231780afbcb2596a851f3d09a8bc58ef477107;hpb=5fa2ec5b24f52ddb14e569970ccb8a24cadbc6b1;p=freeside.git

diff --git a/FS/FS/part_pkg.pm b/FS/FS/part_pkg.pm
index 9f231780a..1dfa1ef03 100644
--- a/FS/FS/part_pkg.pm
+++ b/FS/FS/part_pkg.pm
@@ -605,6 +605,10 @@ sub pkg_comment {
   $pre. $self->pkg. ' - '. $self->custom_comment;
 }
 
+sub price_info { # safety, in case a part_pkg hasn't defined price_info
+    '';
+}
+
 sub custom_comment {
   my $self = shift;
   ( $self->custom ? '(CUSTOM) ' : '' ). $self->comment . ' ' . $self->price_info;