[Rt-commit] [svn] r1568 - rtir/branches/1.1-TESTING/html/RTIR

[leira at pallas.eruditorum.org]

Author: leira
Date: Mon Sep 27 20:13:59 2004
New Revision: 1568

Modified:
   rtir/branches/1.1-TESTING/html/RTIR/index.html
Log:
RT-Ticket: 2922
RT-Status: resolved
RT-Action: correspond
In SimpleSearch, if the argument is a requestor, search for incidents whose children have that requestor.


Modified: rtir/branches/1.1-TESTING/html/RTIR/index.html
==============================================================================
--- rtir/branches/1.1-TESTING/html/RTIR/index.html	(original)
+++ rtir/branches/1.1-TESTING/html/RTIR/index.html	Mon Sep 27 20:13:59 2004
@@ -66,8 +66,16 @@
 
     $session{'tickets'} = RT::Tickets->new( $session{'CurrentUser'} );
 
+    # Incidents don't have requestors, but children do
     if ( $query =~ m/\@/ ) {
-        $m->comp("/RTIR/Search/Results.html", Queue => 'Incidents', Query => "Requestor = '$query'");
+	my $children = new RT::Tickets($session{'CurrentUser'});
+	$children->FromSQL("(Queue = 'Incident Reports' OR Queue = 'Investigations' OR Queue = 'Blocks') and Requestor LIKE '$query'");
+	my $querystring;
+	while (my $child = $children->Next) {
+	    $querystring .= " OR " if $querystring;
+	    $querystring .= "HasMember = " . $child->Id;
+	}
+        $m->comp("/RTIR/Search/Results.html", Queue => 'Incidents', Query => ($querystring));
 
         return();
     }