From 82f76d01660b785f6c4ea13ba547c93c1c2c404d Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Sun, 18 Jan 2015 14:23:26 -0800 Subject: disable quotations without fully-qualifying all other searches, RT#20688, RT#22232 --- FS/FS/Record.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'FS') 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); -- cgit v1.2.1