[Rt-commit] r6813 - rt/branches/3.6-RELEASE/lib/t/regression

[ruz at bestpractical.com]

Author: ruz
Date: Fri Jan 26 10:35:53 2007
New Revision: 6813

Modified:
   rt/branches/3.6-RELEASE/lib/t/regression/22search_tix_by_watcher.t

Log:
* add test that fails due to bug in searches by watcher

Modified: rt/branches/3.6-RELEASE/lib/t/regression/22search_tix_by_watcher.t
==============================================================================
--- rt/branches/3.6-RELEASE/lib/t/regression/22search_tix_by_watcher.t	(original)
+++ rt/branches/3.6-RELEASE/lib/t/regression/22search_tix_by_watcher.t	Fri Jan 26 10:35:53 2007
@@ -212,4 +212,21 @@
     is($tix->Count, 2, "found ticket(s)");
 }
 
+
+ at data = ( { Subject => '4', Requestor => [ 'charly at example.com', 'bravo at example.com' ] } );
+add_tix_from_data();
+
+diag "Requestor = 'x' AND Requestor = 'y'" if $ENV{'TEST_VERBOSE'};
+{
+    my $tix = RT::Tickets->new($RT::SystemUser);
+    $tix->FromSQL("Queue = '$queue' AND
+                   (Requestor = 'bravo\@example.com' AND Requestor = 'charly\@example.com')");
+    is($tix->Count, 1, "found ticket(s)");
+    is_deeply( [sort $tix->First->RequestorAddresses],
+               ['bravo at example.com', 'charly at example.com'],
+               "requestor addresses are correct"
+             );
+}
+
+
 exit(0)