From bc2e387fcf4cf847ef7b51e4137e276fedea5c1e Mon Sep 17 00:00:00 2001
From: khoff <khoff>
Date: Tue, 6 May 2003 20:33:03 +0000
Subject: [PATCH] Can't pull  out of thin air.

---
 httemplate/view/cust_main_alt.cgi | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/httemplate/view/cust_main_alt.cgi b/httemplate/view/cust_main_alt.cgi
index 80fa49e04..01e46b59a 100644
--- a/httemplate/view/cust_main_alt.cgi
+++ b/httemplate/view/cust_main_alt.cgi
@@ -371,7 +371,7 @@ print qq!<BR><A NAME="cust_pkg">Packages</A> !,
 
 #get package info
 
-my $packages = get_packages();
+my $packages = get_packages($cust_main);
 
 if ( @$packages ) {
 %>
@@ -673,6 +673,8 @@ sub keyfield_numerically { (split(/\t/,$a))[0] <=> (split(/\t/,$b))[0]; }
 
 sub get_packages {
 
+my $cust_main = shift or return undef;
+
 my @packages = ();
 
 foreach my $cust_pkg (($conf->exists('hidecancelledpackages') ? ($cust_main->ncancelled_pkgs)
-- 
2.11.0