X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Felements%2Ftr-select-did.html;h=6dd057600d0f9bb07de082a0f745f8ff2b22ddc0;hb=70569273833d91085c6c562865a78a08ddde49a1;hp=c8a653e5736890549a91a9c3780973e9f1474b66;hpb=b153693eaaf58e5af5f454e40f9ec169128f6d92;p=freeside.git diff --git a/httemplate/elements/tr-select-did.html b/httemplate/elements/tr-select-did.html index c8a653e57..6dd057600 100644 --- a/httemplate/elements/tr-select-did.html +++ b/httemplate/elements/tr-select-did.html @@ -19,12 +19,12 @@ <%init> my %opt = @_; - +warn Dumper(\%opt); my $cell_style = $opt{'cell_style'} ? 'STYLE="'. $opt{'cell_style'}. '"' : ''; #false laziness w/select-did.html #XXX make sure this comes through on errors too -my $svcpart = $opt{'svcpart'} || $opt{'object'}->svcpart; +my $svcpart = $opt{'svcpart'} || $opt{'object'}->cust_svc->svcpart; my $part_svc = qsearchs('part_svc', { 'svcpart'=>$svcpart } ); die "unknown svcpart $svcpart" unless $part_svc;