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

(-)a/misc/maintenance/fix_tags_weight.pl (-7 / +3 lines)
Lines 65-79 binmode( STDOUT, ":encoding(UTF-8)" ); Link Here
65
my $help;
65
my $help;
66
my $verbose;
66
my $verbose;
67
67
68
my $result = GetOptions(
68
GetOptions(
69
    'help|h'    => \$help,
69
    'help|h'    => \$help,
70
    'verbose|v' => \$verbose
70
    'verbose|v' => \$verbose
71
);
71
) or pod2usage(2);
72
72
73
if ( not $result or $help ) {
73
pod2usage(1) if $help;
74
    pod2usage();
75
    exit 0;
76
}
77
74
78
fix_tags_approval($verbose);
75
fix_tags_approval($verbose);
79
fix_tags_index( $verbose );
76
fix_tags_index( $verbose );
80
- 

Return to bug 21846