View | Details | Raw Unified | Return to bug 36081
Collapse All | Expand All

(-)a/t/db_dependent/Koha/ArticleRequest.t (-11 / +18 lines)
Lines 44-51 subtest 'request() tests' => sub { Link Here
44
    my $patron = $builder->build_object( { class => 'Koha::Patrons', value => { lastseen => undef } } );
44
    my $patron = $builder->build_object( { class => 'Koha::Patrons', value => { lastseen => undef } } );
45
    my $item   = $builder->build_sample_item;
45
    my $item   = $builder->build_sample_item;
46
46
47
    my $ar_mock = Test::MockModule->new('Koha::ArticleRequest');
47
    my $ar_module = mock_article_request_module();
48
    $ar_mock->mock( 'notify', sub { ok( 1, '->notify() called' ); } );
49
48
50
    my $ar = Koha::ArticleRequest->new(
49
    my $ar = Koha::ArticleRequest->new(
51
        {
50
        {
Lines 100-107 subtest 'set_pending() tests' => sub { Link Here
100
    my $patron = $builder->build_object( { class => 'Koha::Patrons' } );
99
    my $patron = $builder->build_object( { class => 'Koha::Patrons' } );
101
    my $biblio = $builder->build_sample_biblio;
100
    my $biblio = $builder->build_sample_biblio;
102
101
103
    my $ar_mock = Test::MockModule->new('Koha::ArticleRequest');
102
    my $ar_module = mock_article_request_module();
104
    $ar_mock->mock( 'notify', sub { ok( 1, '->notify() called' ); } );
105
103
106
    my $ar = Koha::ArticleRequest->new(
104
    my $ar = Koha::ArticleRequest->new(
107
        {
105
        {
Lines 124-131 subtest 'process() tests' => sub { Link Here
124
122
125
    $schema->storage->txn_begin;
123
    $schema->storage->txn_begin;
126
124
127
    my $ar_mock = Test::MockModule->new('Koha::ArticleRequest');
125
    my $ar_module = mock_article_request_module();
128
    $ar_mock->mock( 'notify', sub { ok( 1, '->notify() called' ); } );
129
126
130
    my $ar = $builder->build_object(
127
    my $ar = $builder->build_object(
131
        {
128
        {
Lines 147-154 subtest 'complete() tests' => sub { Link Here
147
144
148
    $schema->storage->txn_begin;
145
    $schema->storage->txn_begin;
149
146
150
    my $ar_mock = Test::MockModule->new('Koha::ArticleRequest');
147
    my $ar_module = mock_article_request_module();
151
    $ar_mock->mock( 'notify', sub { ok( 1, '->notify() called' ); } );
152
148
153
    my $ar = $builder->build_object(
149
    my $ar = $builder->build_object(
154
        {
150
        {
Lines 178-185 subtest 'cancel() tests' => sub { Link Here
178
    my $patron = $builder->build_object( { class => 'Koha::Patrons' } );
174
    my $patron = $builder->build_object( { class => 'Koha::Patrons' } );
179
    my $item   = $builder->build_sample_item;
175
    my $item   = $builder->build_sample_item;
180
176
181
    my $ar_mock = Test::MockModule->new('Koha::ArticleRequest');
177
    my $ar_module = mock_article_request_module();
182
    $ar_mock->mock( 'notify', sub { ok( 1, '->notify() called' ); } );
183
178
184
    my $ar = Koha::ArticleRequest->new(
179
    my $ar = Koha::ArticleRequest->new(
185
        {
180
        {
Lines 227-229 subtest 'store' => sub { Link Here
227
222
228
    $schema->storage->txn_rollback;
223
    $schema->storage->txn_rollback;
229
};
224
};
230
- 
225
226
sub mock_article_request_module {
227
    my $ar_mock = Test::MockModule->new('Koha::ArticleRequest');
228
    $ar_mock->mock( 'notify', sub { ok( 1, '->notify() called' ); } );
229
    $ar_mock->mock(
230
        'format',
231
        sub {
232
            my $formats = C4::Context->multivalue_preference('ArticleRequestsSupportedFormats');
233
            return $formats->[ int( rand( scalar @$formats ) ) ];
234
        }
235
    );
236
    return $ar_mock;
237
}

Return to bug 36081