summaryrefslogtreecommitdiff
path: root/FS
diff options
context:
space:
mode:
Diffstat (limited to 'FS')
-rw-r--r--FS/FS/Record.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index 4546741a9..0810a7ec3 100644
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -45,6 +45,8 @@ our $nowarn_classload = 0;
our $no_update_diff = 0;
our $no_history = 0;
+our $qsearch_qualify_columns = 0;
+
our $no_check_foreign = 1; #well, not inefficiently in perl by default anymore
my $rsa_module;
@@ -754,7 +756,7 @@ sub get_real_fields {
my $op = '=';
my $column = $_;
- my $table_column = "$table.$column";
+ my $table_column = $qsearch_qualify_columns ? "$table.$column" : $column;
my $type = dbdef->table($table)->column($column)->type;
my $value = $record->{$column};
$value = $value->{'value'} if ref($value);