From 5226903b423e42e7e8ee135b2b445d362241102a Mon Sep 17 00:00:00 2001
From: levinse <levinse>
Date: Sat, 12 Feb 2011 05:03:57 +0000
Subject: [PATCH] show package pricing details on customer view, RT11372

---
 FS/FS/part_pkg.pm | 4 ++++
 1 file changed, 4 insertions(+)

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;
-- 
2.11.0