Removed id from primkey field list.

[gosa.git] / gosa-si / modules / GosaSupportDaemon.pm

diff --git a/gosa-si/modules/GosaSupportDaemon.pm b/gosa-si/modules/GosaSupportDaemon.pm
index fe027fe173ff61e95ad0b95d0287839e65dd0f26..0560933c190b087e269d36bba002a161b5164c69 100644 (file)
--- a/gosa-si/modules/GosaSupportDaemon.pm
+++ b/gosa-si/modules/GosaSupportDaemon.pm
@@ -28,6 +28,7 @@ use Crypt::Rijndael;
 use Digest::MD5  qw(md5 md5_hex md5_base64);
 use MIME::Base64;
 use XML::Simple;
+use Data::Dumper;
 
 my $op_hash = {
     'eq' => '=',
@@ -266,7 +267,7 @@ sub get_where_statement {
                 push(@phrase_l, "$tag$operator'$val'");
             }
             my $clause_str .= join(" $connector ", @phrase_l);
-            push(@clause_l, $clause_str);
+            push(@clause_l, "($clause_str)");
         }
 
         if( not 0 == @clause_l ) {
@@ -283,7 +284,7 @@ sub get_select_statement {
     my $select = "*";
     if( exists $msg_hash->{'select'} ) {
         my $select_l = \@{$msg_hash->{'select'}};
-        $select = join(' AND ', @{$select_l});
+        $select = join(', ', @{$select_l});
     }
     return $select;
 }