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

(-)a/Koha/BackgroundJob/BatchUpdateAuthority.pm (-4 / +1 lines)
Lines 31-37 sub process { Link Here
31
        ->store;
31
        ->store;
32
32
33
    my $mmtid = $args->{mmtid};
33
    my $mmtid = $args->{mmtid};
34
    my $record_type = $args->{record_type};
35
    my @record_ids = @{ $args->{record_ids} };
34
    my @record_ids = @{ $args->{record_ids} };
36
35
37
    my $report = {
36
    my $report = {
Lines 85-100 sub enqueue { Link Here
85
84
86
    # TODO Raise exception instead
85
    # TODO Raise exception instead
87
    return unless exists $args->{mmtid};
86
    return unless exists $args->{mmtid};
88
    return unless exists $args->{record_type}; #FIXME RMME
89
    return unless exists $args->{record_ids};
87
    return unless exists $args->{record_ids};
90
88
91
    my $mmtid = $args->{mmtid};
89
    my $mmtid = $args->{mmtid};
92
    my $record_type = $args->{record_type};
93
    my @record_ids = @{ $args->{record_ids} };
90
    my @record_ids = @{ $args->{record_ids} };
94
91
95
    $self->SUPER::enqueue({
92
    $self->SUPER::enqueue({
96
        job_size => scalar @record_ids,
93
        job_size => scalar @record_ids,
97
        job_args => {mmtid => $mmtid, record_type => $record_type, record_ids => \@record_ids,}
94
        job_args => {mmtid => $mmtid, record_ids => \@record_ids,}
98
    });
95
    });
99
}
96
}
100
97
(-)a/Koha/BackgroundJob/BatchUpdateBiblio.pm (-4 / +1 lines)
Lines 35-41 sub process { Link Here
35
        ->store;
35
        ->store;
36
36
37
    my $mmtid = $args->{mmtid};
37
    my $mmtid = $args->{mmtid};
38
    my $record_type = $args->{record_type};
39
    my @record_ids = @{ $args->{record_ids} };
38
    my @record_ids = @{ $args->{record_ids} };
40
39
41
    my $report = {
40
    my $report = {
Lines 91-106 sub enqueue { Link Here
91
90
92
    # TODO Raise exception instead
91
    # TODO Raise exception instead
93
    return unless exists $args->{mmtid};
92
    return unless exists $args->{mmtid};
94
    return unless exists $args->{record_type}; #FIXME RMME
95
    return unless exists $args->{record_ids};
93
    return unless exists $args->{record_ids};
96
94
97
    my $mmtid = $args->{mmtid};
95
    my $mmtid = $args->{mmtid};
98
    my $record_type = $args->{record_type};
99
    my @record_ids = @{ $args->{record_ids} };
96
    my @record_ids = @{ $args->{record_ids} };
100
97
101
    $self->SUPER::enqueue({
98
    $self->SUPER::enqueue({
102
        job_size => scalar @record_ids,
99
        job_size => scalar @record_ids,
103
        job_args => {mmtid => $mmtid, record_type => $record_type, record_ids => \@record_ids,}
100
        job_args => {mmtid => $mmtid, record_ids => \@record_ids,}
104
    });
101
    });
105
}
102
}
106
103
(-)a/tools/batch_record_modification.pl (-2 lines)
Lines 152-158 if ( $op eq 'form' ) { Link Here
152
    try {
152
    try {
153
        my $params = {
153
        my $params = {
154
            mmtid       => $mmtid,
154
            mmtid       => $mmtid,
155
            record_type => $recordtype,
156
            record_ids  => \@record_ids,
155
            record_ids  => \@record_ids,
157
        };
156
        };
158
157
159
- 

Return to bug 22417