Lines 12-17
my $destination = $ARGV[0];
Link Here
|
12 |
my $marc_type = $ARGV[1] || 'marc21'; |
12 |
my $marc_type = $ARGV[1] || 'marc21'; |
13 |
my $indexing_mode = $ARGV[2] || 'grs1'; |
13 |
my $indexing_mode = $ARGV[2] || 'grs1'; |
14 |
|
14 |
|
|
|
15 |
$ENV{__BIB_INDEX_MODE__} = $indexing_mode; |
16 |
$ENV{__AUTH_INDEX_MODE__} = $indexing_mode; |
17 |
|
15 |
$ENV{__ZEBRA_MARC_FORMAT__} = $marc_type; |
18 |
$ENV{__ZEBRA_MARC_FORMAT__} = $marc_type; |
16 |
if ($indexing_mode eq 'dom') { |
19 |
if ($indexing_mode eq 'dom') { |
17 |
$ENV{__ZEBRA_BIB_CFG__} = 'zebra-biblios-dom.cfg'; |
20 |
$ENV{__ZEBRA_BIB_CFG__} = 'zebra-biblios-dom.cfg'; |
18 |
- |
|
|