summaryrefslogtreecommitdiff
path: root/biblio/bibtex/utils/bibcop/bibcop.pl
diff options
context:
space:
mode:
Diffstat (limited to 'biblio/bibtex/utils/bibcop/bibcop.pl')
-rwxr-xr-xbiblio/bibtex/utils/bibcop/bibcop.pl8
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;