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

(-)a/svc/split_callnumbers (-1 / +1 lines)
Lines 3-8 Link Here
3
use Modern::Perl;
3
use Modern::Perl;
4
use JSON qw( from_json );
4
use JSON qw( from_json );
5
use C4::Service;
5
use C4::Service;
6
use C4::ClassSplitRoutine::RegEx;
6
7
7
our ( $query, $response ) = C4::Service->init( parameters => 'parameters_remaining_permissions' );
8
our ( $query, $response ) = C4::Service->init( parameters => 'parameters_remaining_permissions' );
8
9
9
- 

Return to bug 30926