Bug 20866: (QA follow-up) Use build_object and remove two tests
authorMarcel de Rooy <m.de.rooy@rijksmuseum.nl>
Tue, 5 Jun 2018 11:45:06 +0000 (13:45 +0200)
committerNick Clemens <nick@bywatersolutions.com>
Fri, 8 Jun 2018 10:08:07 +0000 (10:08 +0000)
The unique constraint on userid is handled in TestBuilder. So let's use it.
The two tests if count==$count do not make much sense anymore when we
call ->count a few lines before. The check with search_limited is enough.

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
t/db_dependent/ArticleRequests.t

index cc43185..ab2145f 100755 (executable)
@@ -67,17 +67,16 @@ ok( $item->id, 'Koha::Item created' );
 
 my $branch   = $builder->build({ source => 'Branch' });
 my $category = $builder->build({ source => 'Category' });
-my $patron   = Koha::Patron->new(
-    {
+my $patron   = $builder->build_object({
+    class => 'Koha::Patrons',
+    value => {
         categorycode => $category->{categorycode},
         branchcode   => $branch->{branchcode},
         flags        => 1,# superlibrarian
-        userid       => 'a_userid_for_tests', # So far Koha::Patron->store does not deal with userid, see bug 20287
-    }
-)->store();
+    },
+});
 ok( $patron->id, 'Koha::Patron created' );
-my $patron_2 = $builder->build({ source => 'Borrower', value => { flags => 0 } });
-$patron_2 = Koha::Patrons->find( $patron_2->{borrowernumber} );
+my $patron_2 = $builder->build_object({ class => 'Koha::Patrons', value => { flags => 0 } });
 
 # store
 Koha::Notice::Messages->delete;
@@ -204,7 +203,7 @@ is( $item->article_request_type($patron), 'no', 'Item article request type is no
 $rule->delete();
 
 subtest 'search_limited' => sub {
-    plan tests => 4;
+    plan tests => 2;
     C4::Context->_new_userenv('xxx');
     my $nb_article_requests = Koha::ArticleRequests->count;
 
@@ -213,10 +212,8 @@ subtest 'search_limited' => sub {
     Koha::Library::Group->new({ parent_id => $group_1->id,  branchcode => $patron->branchcode })->store();
     Koha::Library::Group->new({ parent_id => $group_2->id,  branchcode => $patron_2->branchcode })->store();
     set_logged_in_user( $patron ); # Is superlibrarian
-    is( Koha::ArticleRequests->count, $nb_article_requests, 'Koha::ArticleRequests should return all article requests' );
     is( Koha::ArticleRequests->search_limited->count, $nb_article_requests, 'Koha::ArticleRequests->search_limited should return all article requests for superlibrarian' );
     set_logged_in_user( $patron_2 ); # Is restricted
-    is( Koha::ArticleRequests->count, $nb_article_requests, 'Koha::ArticleRequests should return all article requests' );
     is( Koha::ArticleRequests->search_limited->count, 0, 'Koha::ArticleRequests->search_limited should not return all article requests for restricted patron' );
 };