qualify columns by default in 4.x (experiment?), RT#20688, RT#22232

[freeside.git] / FS / FS / h_svc_forward.pm

diff --git a/FS/FS/h_svc_forward.pm b/FS/FS/h_svc_forward.pm
index 25b2039..7f6a5cc 100644 (file)
--- a/FS/FS/h_svc_forward.pm
+++ b/FS/FS/h_svc_forward.pm
@@ -32,6 +32,9 @@ FS::h_svc_forward - Historical mail forwarding alias objects
 
 sub srcsvc_acct {
   my $self = shift;
+
+  local($FS::Record::qsearch_qualify_columns) = 0;
+
   my $h_svc_acct = qsearchs(
     'h_svc_acct',
     { 'svcnum' => $self->srcsvc },
@@ -52,6 +55,9 @@ sub srcsvc_acct {
 
 sub dstsvc_acct {
   my $self = shift;
+
+  local($FS::Record::qsearch_qualify_columns) = 0;
+
   my $h_svc_acct = qsearchs(
     'h_svc_acct',
     { 'svcnum' => $self->dstsvc },