diff options
| -rw-r--r-- | httemplate/elements/change_history_common.html | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/httemplate/elements/change_history_common.html b/httemplate/elements/change_history_common.html index 9fc85aa53..c858ec123 100644 --- a/httemplate/elements/change_history_common.html +++ b/httemplate/elements/change_history_common.html @@ -191,6 +191,8 @@ my %h_table_labelsub = ( my $discounts = {}; my $discount_descripsub = sub { my($item) = @_; + die "Could not find part_pkg for pkgpart " . $item->pkgpart + unless $item->part_pkg; $pkgpart{$item->pkgpart} ||= $item->part_pkg->pkg; my $dnum = $item->discountnum; $discounts->{$dnum} ||= qsearchs({ |