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

(-)a/misc/migration_tools/rebuild_zebra.pl (-1 / +3 lines)
Lines 35-40 my $as_xml; Link Here
35
my $process_zebraqueue;
35
my $process_zebraqueue;
36
my $do_not_clear_zebraqueue;
36
my $do_not_clear_zebraqueue;
37
my $verbose_logging;
37
my $verbose_logging;
38
my $limit;
38
my $zebraidx_log_opt = " -v none,fatal,warn ";
39
my $zebraidx_log_opt = " -v none,fatal,warn ";
39
my $result = GetOptions(
40
my $result = GetOptions(
40
    'd:s'           => \$directory,
41
    'd:s'           => \$directory,
Lines 52-57 my $result = GetOptions( Link Here
52
    'y'             => \$do_not_clear_zebraqueue,
53
    'y'             => \$do_not_clear_zebraqueue,
53
    'z'             => \$process_zebraqueue,
54
    'z'             => \$process_zebraqueue,
54
    'v'             => \$verbose_logging,
55
    'v'             => \$verbose_logging,
56
    'l|limit:i'     => \$limit,
55
);
57
);
56
58
57
59
Lines 313-318 sub export_marc_records_from_sth { Link Here
313
    my $i = 0;
315
    my $i = 0;
314
    my ( $itemtag, $itemsubfield ) = GetMarcFromKohaField("items.itemnumber",'');
316
    my ( $itemtag, $itemsubfield ) = GetMarcFromKohaField("items.itemnumber",'');
315
    while (my ($record_number) = $sth->fetchrow_array) {
317
    while (my ($record_number) = $sth->fetchrow_array) {
318
        last if defined $limit && $i >= $limit;
316
        print "." if ( $verbose_logging );
319
        print "." if ( $verbose_logging );
317
        print "\r$i" unless ($i++ %100 or !$verbose_logging);
320
        print "\r$i" unless ($i++ %100 or !$verbose_logging);
318
        if ( $nosanitize ) {
321
        if ( $nosanitize ) {
319
- 

Return to bug 7246