diff options
author | Norbert Preining <norbert@preining.info> | 2024-01-17 03:01:02 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2024-01-17 03:01:02 +0000 |
commit | 4fd81a66c82a2ba8787c6ca78bfcc14820e4017c (patch) | |
tree | bd843b1d561c776d5f54e18c0f07c05b079bb791 /biblio/bibtex/utils/bibcop/bibcop.pl | |
parent | 384734a07c53090ad651e786d248c5ba8cd4606e (diff) |
CTAN sync 202401170301
Diffstat (limited to 'biblio/bibtex/utils/bibcop/bibcop.pl')
-rwxr-xr-x | biblio/bibtex/utils/bibcop/bibcop.pl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/biblio/bibtex/utils/bibcop/bibcop.pl b/biblio/bibtex/utils/bibcop/bibcop.pl index 2b44f2d571..f1e5121ffc 100755 --- a/biblio/bibtex/utils/bibcop/bibcop.pl +++ b/biblio/bibtex/utils/bibcop/bibcop.pl @@ -21,7 +21,7 @@ # OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE # SOFTWARE. -# 2024-01-12 0.0.17 +# 2024-01-16 0.0.18 package bibcop; use warnings; @@ -894,7 +894,7 @@ sub fail { } if (not basename($0) eq 'bibcop.pl') { - return 1; + goto END; } if (@ARGV+0 eq 0 or exists $args{'--help'} or exists $args{'-?'}) { @@ -917,7 +917,7 @@ if (@ARGV+0 eq 0 or exists $args{'--help'} or exists $args{'-?'}) { " --latex Report errors in LaTeX format using \\PackageWarningNoLine command\n\n" . "If any issues, report to GitHub: https://github.com/yegor256/bibcop"); } elsif (exists $args{'--version'} or exists $args{'-v'}) { - info('0.0.17 2024-01-12'); + info('0.0.18 2024-01-16'); } else { my ($file) = grep { not($_ =~ /^-.*$/) } @ARGV; if (not $file) { @@ -957,5 +957,7 @@ if (@ARGV+0 eq 0 or exists $args{'--help'} or exists $args{'-?'}) { } } +END: + # In order to finish it with success: 1; |