https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=18728

--- Comment #7 from Jonathan Druart <[email protected]> 
---
I used the following script to generate the data:

use Modern::Perl;
use t::lib::TestBuilder;
my $builder = t::lib::TestBuilder->new;

my $type = 'Suggestion';
my $number = 100;

if ( $type eq 'Suggestion' ) {
    for ( 1 .. $number ) {
        my $managed_by = $builder->build({ source => 'Borrower' });
        my $suggested_by = $builder->build({ source => 'Borrower' });
        $builder->build({ source => 'Suggestion', value => { STATUS =>
'pending', managedby => $managed_by->{borrowernumber}, suggestedby =>
$suggested_by->{borrowernumber} } });
    }
}

-- 
You are receiving this mail because:
You are watching all bug changes.
_______________________________________________
Koha-bugs mailing list
[email protected]
http://lists.koha-community.org/cgi-bin/mailman/listinfo/koha-bugs
website : http://www.koha-community.org/
git : http://git.koha-community.org/
bugs : http://bugs.koha-community.org/

Reply via email to