gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 21846: Fix pod2usage return values 

According to existing pattern.
However I am not sure it makes sense to return an errno (and print to STDERR)
if --help is passed.

Signed-off-by: Josef Moravec <josef.moravec@gmail.com>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
(cherry picked from commit d7c0547bd2)
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
This commit is contained in:
Jonathan Druart 2019-02-26 16:32:44 -03:00 committed by Martin Renvoize
parent bd7506c7f3
commit 982ebad2f3
No known key found for this signature in database
GPG Key ID: 422B469130441A0F
1 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
misc/maintenance/fix_tags_weight.pl
View File

@ -65,15 +65,12 @@ binmode( STDOUT, ":encoding(UTF-8)" );
my $help;
my $verbose;
my $result = GetOptions(
GetOptions(
'help|h' => \$help,
'verbose|v' => \$verbose
);
) or pod2usage(2);
if ( not $result or $help ) {
pod2usage();
exit 0;
}
pod2usage(1) if $help;
fix_tags_approval($verbose);
fix_tags_index( $verbose );