diff options
author | ivan <ivan> | 2011-03-12 21:30:57 +0000 |
---|---|---|
committer | ivan <ivan> | 2011-03-12 21:30:57 +0000 |
commit | 1888d732dcc9f50b7f88ebc684d1c05b534cbd92 (patch) | |
tree | b9a67d17b38f1e508fa6bb07bd9e799edabe65e8 /httemplate/view/qual.cgi | |
parent | 4e76632c66f001a4f4d97aadc308038172eaeaa7 (diff) |
refactor transaction from process/qual.cgi to qual.pm insert, RT#7111
Diffstat (limited to 'httemplate/view/qual.cgi')
-rw-r--r-- | httemplate/view/qual.cgi | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/httemplate/view/qual.cgi b/httemplate/view/qual.cgi index 45f3d2a62..ec3a7cf1d 100644 --- a/httemplate/view/qual.cgi +++ b/httemplate/view/qual.cgi @@ -37,7 +37,7 @@ % my $pkglist = $qual_result->{'pkglist'}; % my $cust_or_prospect = $qual->cust_or_prospect; % my $locationnum = ''; -% my %location = $qual->location; +% my %location = $qual->location_hash; % if (%location && $location{'locationnum'}) { % $locationnum = $location{'locationnum'}; % } @@ -82,7 +82,7 @@ if ( $cgi->param('qualnum') ) { my $qual = qsearchs('qual', { qualnum => $qualnum }) or die "invalid qualnum"; my $location_line = ''; -my %location_hash = $qual->location; +my %location_hash = $qual->location_hash; my $cust_location; if ( %location_hash ) { $cust_location = new FS::cust_location(\%location_hash); |