summaryrefslogtreecommitdiff
path: root/httemplate/view/qual.cgi
diff options
context:
space:
mode:
authorivan <ivan>2011-03-12 21:30:57 +0000
committerivan <ivan>2011-03-12 21:30:57 +0000
commit1888d732dcc9f50b7f88ebc684d1c05b534cbd92 (patch)
treeb9a67d17b38f1e508fa6bb07bd9e799edabe65e8 /httemplate/view/qual.cgi
parent4e76632c66f001a4f4d97aadc308038172eaeaa7 (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.cgi4
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);