X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fview%2Fcust_pkg.cgi;h=d8a0041eee80328f19b6d38b72688d207752e3d5;hp=4e036496a54db0eb03e3057cad21cee446ba8a75;hb=f77cbf2281ef5ea2e0b81b64fdd1dd78fca3e543;hpb=c13b6c8f4b9876aa8f91e1c14d3c208ac0d189e9 diff --git a/httemplate/view/cust_pkg.cgi b/httemplate/view/cust_pkg.cgi index 4e036496a..d8a0041ee 100755 --- a/httemplate/view/cust_pkg.cgi +++ b/httemplate/view/cust_pkg.cgi @@ -1,14 +1,11 @@ -<& /elements/header-cust_main.html, - view => 'packages', - custnum => $cust_pkg->custnum, -&> - -<& /elements/footer-cust_main.html &> +<% $cgi->redirect($path) %> <%init> - +# since cust_pkgs can't be viewed directly, just throw a redirect my ($pkgnum) = $cgi->keywords; $pkgnum =~ /^\d+$/ or die "invalid pkgnum '$pkgnum'"; +my $show = $FS::CurrentUser::CurrentUser->default_customer_view =~ /^(jumbo|packages)$/ ? '' : ';show=packages'; -my $cust_pkg = FS::cust_pkg->by_key($pkgnum) or die "pkgnum $pkgnum not found"; - +my $self = FS::cust_pkg->by_key($pkgnum) or die "pkgnum $pkgnum not found"; +my $frag = 'cust_pkg'. $self->pkgnum; +my $path = $p.'view/cust_main.cgi?custnum='.$self->custnum.";$show#$frag";