Skip to content

Commit

Permalink
cleanup of test
Browse files Browse the repository at this point in the history
  • Loading branch information
tgrego committed Jul 31, 2015
1 parent c0ed4ea commit 1a63b6e
Showing 1 changed file with 4 additions and 7 deletions.
11 changes: 4 additions & 7 deletions t/lib/LIMS2/t/WebApp/Controller/User/Crisprs.pm
@@ -1,11 +1,9 @@
package LIMS2::t::WebApp::Controller::User::Crisprs;

use base qw(Test::Class);
use Test::Most;
use LIMS2::WebApp::Controller::User::Crisprs;

use LIMS2::Test;
use Data::Dumper;

use strict;

BEGIN
Expand Down Expand Up @@ -37,8 +35,8 @@ sub all_tests : Test(21)
my @links = $mech->find_all_links(url_regex => qr{/user/crispr/\d*});
is scalar @links, 2, 'found 2 crispr links after import';
$mech->links_ok(\@links, 'can follow crispr links from import page');
print $mech->content;
my ($group_id) = ($mech->content =~ /Crispr Group <a .*>(\d*)<\/a> Imported/g);

my ($group_id) = ($mech->content =~ /Crispr Group <a.*>(\d*)<\/a> Imported/g);

# load design target
# Check new group is found for target
Expand Down Expand Up @@ -73,8 +71,7 @@ sub all_tests : Test(21)
},
button => 'action'
);
print Dumper "$group_id:$design_id";
#print Dumper $mech->content;

ok $res->is_success, 'submitted request to link crispr group to design';
$mech->content_contains('no crispr in the group lies wholly within target region of design');

Expand Down

0 comments on commit 1a63b6e

Please sign in to comment.