[Rt-commit] r13180 - in rt/branches/3.8-TESTING: .

[falcone at bestpractical.com]

Author: falcone
Date: Wed Jun 11 16:15:27 2008
New Revision: 13180

Modified:
   rt/branches/3.8-TESTING/   (props changed)
   rt/branches/3.8-TESTING/t/web/attachments.t

Log:
 r34232 at ketch:  falcone | 2008-06-11 16:14:17 -0400
 * remove fragile regexp


Modified: rt/branches/3.8-TESTING/t/web/attachments.t
==============================================================================
--- rt/branches/3.8-TESTING/t/web/attachments.t	(original)
+++ rt/branches/3.8-TESTING/t/web/attachments.t	Wed Jun 11 16:15:27 2008
@@ -10,12 +10,9 @@
 my ($baseurl, $m) = RT::Test->started_ok;
 ok $m->login, 'logged in';
 
-my $queue_name = 'General';
-my $qid;
-{
-    $m->content =~ /<SELECT\s+NAME\s*="Queue"[^>]*>.*?<OPTION\s+VALUE="(\d+)".*?>\s*\Q$queue_name\E\s*<\/OPTION>/msig;
-    ok( $qid = $1, "found id of the '$queue_name' queue");
-}
+my $queue = RT::Queue->new($RT::Nobody);
+my $qid = $queue->Load('General');
+ok( $qid, "Loaded General queue" );
 
 $m->form_name('CreateTicketInQueue');
 $m->field('Queue', $qid);