This commit was generated by cvs2svn to compensate for changes in r6255,

which included commits to RCS files with non-trunk default branches.

1 files changed, 17 insertions, 0 deletions

diff --git a/rt/lib/RT/Search/Googleish.pm b/rt/lib/RT/Search/Googleish.pm
index a7a1d3e77..a2a887377 100644
--- a/rt/lib/RT/Search/Googleish.pm
+++ b/rt/lib/RT/Search/Googleish.pm
@@ -74,6 +74,16 @@ use strict;
 use base qw(RT::Search::Generic);
 
 
+# sub _Init {{{
+sub _Init {
+    my $self = shift;
+    my %args = @_;
+
+    $self->{'Queues'} = delete($args{'Queues'}) || [];
+    $self->SUPER::_Init(%args);
+}
+# }}}
+
 # {{{ sub Describe 
 sub Describe  {
   my $self = shift;
@@ -141,6 +151,13 @@ sub QueryToSQL {
         }
     }
 
+    # restrict to any queues requested by the caller
+    for my $queue (@{ $self->{'Queues'} }) {
+        my $QueueObj = RT::Queue->new($self->TicketsObj->CurrentUser);
+        $QueueObj->Load($queue) or next;
+        push @queue_clauses, "Queue = '" . $QueueObj->Name . "'";
+    }
+
     push @tql_clauses, join( " OR ", sort @id_clauses );
     push @tql_clauses, join( " OR ", sort @owner_clauses );
     push @tql_clauses, join( " OR ", sort @status_clauses );