diff options
| author | levinse <levinse> | 2011-02-12 05:03:57 +0000 |
|---|---|---|
| committer | levinse <levinse> | 2011-02-12 05:03:57 +0000 |
| commit | 5226903b423e42e7e8ee135b2b445d362241102a (patch) | |
| tree | 13faf578878aef22e404bded0ea9adbbd3d798e6 | |
| parent | 5fa2ec5b24f52ddb14e569970ccb8a24cadbc6b1 (diff) | |
show package pricing details on customer view, RT11372
| -rw-r--r-- | FS/FS/part_pkg.pm | 4 |
1 files changed, 4 insertions, 0 deletions
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; |