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

(-)a/tools/batchMod.pl (-1 / +1 lines)
Lines 191-197 if ($op eq "action") { Link Here
191
        my $itemdata = $item->unblessed;
191
        my $itemdata = $item->unblessed;
192
        if ( $del ){
192
        if ( $del ){
193
            my $return = $item->safe_delete;
193
            my $return = $item->safe_delete;
194
			if ($return == 1) {
194
            if (ref($return)) {
195
			    $deleted_items++;
195
			    $deleted_items++;
196
			} else {
196
			} else {
197
			    $not_deleted_items++;
197
			    $not_deleted_items++;
(-)a/tools/batch_delete_records.pl (-3 / +2 lines)
Lines 177-184 if ( $op eq 'form' ) { Link Here
177
            # Delete items
177
            # Delete items
178
            my $items = Koha::Items->search({ biblionumber => $biblionumber });
178
            my $items = Koha::Items->search({ biblionumber => $biblionumber });
179
            while ( my $item = $items->next ) {
179
            while ( my $item = $items->next ) {
180
                my $error = eval { $item->safe_delete };
180
                my $deleted_item = eval { $item->safe_delete };
181
                if ( $error ne '1' or $@ ) {
181
                if ( !ref($deleted_item) or $@ ) {
182
                    push @messages, {
182
                    push @messages, {
183
                        type => 'error',
183
                        type => 'error',
184
                        code => 'item_not_deleted',
184
                        code => 'item_not_deleted',
185
- 

Return to bug 23463