use strict;
use Modern::Perl;
use warnings;
use 5.010;
use C4::Context;
use C4::Circulation;
use C4::Members;
use t::lib::TestBuilder;
use Test::More tests => 8;
my $schema = Koha::Database->new->schema;
$schema->storage->txn_begin;
C4::Context->_new_userenv(1234567);
C4::Context->set_userenv(91, 'CLIstaff', '23529001223661', 'CPL',
'CPL', 'CPL', '', 'cc@cscnet.co.uk');
-