Bug 17600: Standardize our EXPORT_OK

[srvgit] / t / db_dependent / rollingloans.t

diff --git a/t/db_dependent/rollingloans.t b/t/db_dependent/rollingloans.t
old mode 100644 (file)
new mode 100755 (executable)
index 973ab98..f72fa9f
--- a/t/db_dependent/rollingloans.t
+++ b/t/db_dependent/rollingloans.t
@@ -2,7 +2,7 @@
 
 use Modern::Perl;
 use C4::Context;
-use C4::Circulation;
+use C4::Circulation qw( CanBookBeIssued AddIssue AddReturn );
 use C4::Members;
 use C4::Items;
 use Koha::DateUtils;
@@ -29,27 +29,21 @@ my $test_item_24 = '502326000404';
 my $test_item_48 = '502326000403';
 
 my $borrower1 = $builder->build_object({ class => 'Koha::Patrons', value => { cardnumber => $test_patron } });
-my $item1 = $builder->build_object({
-    class => 'Koha::Items',
-    value => {
+my $item1 = $builder->build_sample_item(
+    {
         barcode => $test_item_fic,
-        biblionumber => $builder->build( { source => 'Biblioitem' } )->{biblionumber},
     }
-});
-my $item2 = $builder->build_object({
-    class => 'Koha::Items',
-    value => {
+);
+my $item2 = $builder->build_sample_item(
+    {
         barcode => $test_item_24,
-        biblionumber => $builder->build( { source => 'Biblioitem' } )->{biblionumber},
     }
-});
-my $item3 = $builder->build_object({
-    class => 'Koha::Items',
-    value => {
+);
+my $item3 = $builder->build_sample_item(
+    {
         barcode => $test_item_48,
-        biblionumber => $builder->build( { source => 'Biblioitem' } )->{biblionumber},
     }
-});
+);
 
 SKIP: {
     skip 'Missing test borrower or item, skipping tests', 8