X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c4713436b68fcaad7f7f14ace8d28aefb820a1e4..cc78d935992bbc0ec17fe2e0452dea36248d8ba8:/SL/CT.pm

diff --git a/SL/CT.pm b/SL/CT.pm
index 2e8a017b9..888634894 100644
--- a/SL/CT.pm
+++ b/SL/CT.pm
@@ -1254,6 +1254,15 @@ sub search_contacts {
     push @where_tokens, map { "($_)" } join ' OR ', @tokens;
   }
 
+  my ($cvar_where, @cvar_values) = CVar->build_filter_query('module'         => 'Contacts',
+                                                            'trans_id_field' => 'cp.cp_id',
+                                                            'filter'         => $params{filter});
+
+  if ($cvar_where) {
+    push @where_tokens, $cvar_where;
+    push @values, @cvar_values;
+  }
+
   if (my $filter = $params{filter}) {
     for (qw(name title givenname email project abteilung)) {
       next unless $filter->{"cp_$_"};