Bug 26328: Add test

[koha-ffzg.git] / t / db_dependent / Barcodes_ValueBuilder.t

diff --git a/t/db_dependent/Barcodes_ValueBuilder.t b/t/db_dependent/Barcodes_ValueBuilder.t
old mode 100644 (file)
new mode 100755 (executable)
index ef0fa3a..84fcce1
--- a/t/db_dependent/Barcodes_ValueBuilder.t
+++ b/t/db_dependent/Barcodes_ValueBuilder.t
@@ -16,14 +16,14 @@
 
 use Modern::Perl;
 
-use Test::More tests => 7;
+use Test::More tests => 9;
 use Test::MockModule;
 use t::lib::TestBuilder;
 
 use Koha::Database;
 
 BEGIN {
-    use_ok('C4::Barcodes::ValueBuilder');
+    use_ok('C4::Barcodes::ValueBuilder', qw( get_barcode ));
 };
 
 my $schema  = Koha::Database->new->schema;
@@ -61,8 +61,6 @@ my %args = (
     day         => '30',
     tag         => '952',
     subfield    => 'p',
-    loctag      => '952',
-    locsubfield => 'a'
 );
 
 my ($nextnum, $scr) = C4::Barcodes::ValueBuilder::incremental::get_barcode(\%args);
@@ -77,5 +75,14 @@ ok(length($scr) > 0, 'hbyymmincr javascript');
 is($nextnum, '2012-0035', 'annual barcode');
 is($scr, undef, 'annual javascript');
 
-$schema->storage->txn_rollback;
+$dbh->do(q|DELETE FROM items|);
+my $item_5 = $builder->build_sample_item(
+    {
+        barcode => '978e0143019375'
+    }
+);
+($nextnum, $scr) = C4::Barcodes::ValueBuilder::incremental::get_barcode(\%args);
+is($nextnum, '979', 'incremental barcode');
+is($scr, undef, 'incremental javascript');
 
+$schema->storage->txn_rollback;