texlive[69467] trunk: bibcop (17jan24)

commits+karl at tug.org commits+karl at tug.org
Wed Jan 17 21:38:27 CET 2024 

Revision: 69467
          https://tug.org/svn/texlive?view=revision&revision=69467
Author:   karl
Date:     2024-01-17 21:38:27 +0100 (Wed, 17 Jan 2024)
Log Message:
-----------
bibcop (17jan24)

Modified Paths:
--------------
    trunk/Build/source/texk/texlive/linked_scripts/bibcop/bibcop.pl
    trunk/Master/texmf-dist/doc/bibtex/bibcop/bibcop.pdf
    trunk/Master/texmf-dist/doc/man/man1/bibcop.1
    trunk/Master/texmf-dist/doc/man/man1/bibcop.man1.pdf
    trunk/Master/texmf-dist/scripts/bibcop/bibcop.pl
    trunk/Master/texmf-dist/source/bibtex/bibcop/bibcop.dtx
    trunk/Master/texmf-dist/tex/latex/bibcop/bibcop.sty

Modified: trunk/Build/source/texk/texlive/linked_scripts/bibcop/bibcop.pl
===================================================================
--- trunk/Build/source/texk/texlive/linked_scripts/bibcop/bibcop.pl	2024-01-17 16:30:43 UTC (rev 69466)
+++ trunk/Build/source/texk/texlive/linked_scripts/bibcop/bibcop.pl	2024-01-17 20:38:27 UTC (rev 69467)
@@ -21,7 +21,7 @@
 # OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 # SOFTWARE.
 
-# 2024-01-16 0.0.18
+# 2024-01-17 0.0.19
 package bibcop;
 
 use warnings;
@@ -893,7 +893,9 @@
   }
 }
 
-if (not basename($0) eq 'bibcop.pl') {
+my $script = basename($0);
+$script =~ s/\.pl$//g;
+if (not $script eq 'bibcop') {
   goto END;
 }
 
@@ -917,7 +919,7 @@
     "      --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.18 2024-01-16');
+  info('0.0.19 2024-01-17');
 } else {
   my ($file) = grep { not($_ =~ /^-.*$/) } @ARGV;
   if (not $file) {

Modified: trunk/Master/texmf-dist/doc/bibtex/bibcop/bibcop.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/doc/man/man1/bibcop.1
===================================================================
--- trunk/Master/texmf-dist/doc/man/man1/bibcop.1	2024-01-17 16:30:43 UTC (rev 69466)
+++ trunk/Master/texmf-dist/doc/man/man1/bibcop.1	2024-01-17 20:38:27 UTC (rev 69467)
@@ -1,4 +1,4 @@
-.TH bibcop 1 "2024-01-16"
+.TH bibcop 1 "2024-01-17"
 .SH NAME
 bibcop \- Style Checker and Fixer of BibTeX Files (.bib)
 .SH SYNOPSIS

Modified: trunk/Master/texmf-dist/doc/man/man1/bibcop.man1.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/scripts/bibcop/bibcop.pl
===================================================================
--- trunk/Master/texmf-dist/scripts/bibcop/bibcop.pl	2024-01-17 16:30:43 UTC (rev 69466)
+++ trunk/Master/texmf-dist/scripts/bibcop/bibcop.pl	2024-01-17 20:38:27 UTC (rev 69467)
@@ -21,7 +21,7 @@
 # OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 # SOFTWARE.
 
-# 2024-01-16 0.0.18
+# 2024-01-17 0.0.19
 package bibcop;
 
 use warnings;
@@ -893,7 +893,9 @@
   }
 }
 
-if (not basename($0) eq 'bibcop.pl') {
+my $script = basename($0);
+$script =~ s/\.pl$//g;
+if (not $script eq 'bibcop') {
   goto END;
 }
 
@@ -917,7 +919,7 @@
     "      --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.18 2024-01-16');
+  info('0.0.19 2024-01-17');
 } else {
   my ($file) = grep { not($_ =~ /^-.*$/) } @ARGV;
   if (not $file) {

Modified: trunk/Master/texmf-dist/source/bibtex/bibcop/bibcop.dtx
===================================================================
--- trunk/Master/texmf-dist/source/bibtex/bibcop/bibcop.dtx	2024-01-17 16:30:43 UTC (rev 69466)
+++ trunk/Master/texmf-dist/source/bibtex/bibcop/bibcop.dtx	2024-01-17 20:38:27 UTC (rev 69467)
@@ -50,7 +50,7 @@
 %<package>\NeedsTeXFormat{LaTeX2e}
 %<package>\ProvidesPackage{bibcop}
 %<*package>
-[2024-01-16 0.0.18 Style Checker of Bibliography Files]
+[2024-01-17 0.0.19 Style Checker of Bibliography Files]
 %</package>
 %<*driver>
 \documentclass{ltxdoc}
@@ -460,25 +460,19 @@
 \RequirePackage{shellesc}
 \makeatletter
 \newcommand\bibcop at exec[1]{
-  \ifnum\ShellEscapeStatus=1
-    \iexec{\bibcop at script\space
-      \ifdefined\bibcop at verbose--verbose\fi\space
-      \ifdefined\bibcop at notags--no:tags\fi\space
-      \ifdefined\bibcop at noinproc--no:org\fi\space
-      \ifdefined\bibcop at noinproc--no:inproc\fi\space
-      \ifdefined\bibcop at nodoi--no:doi\fi\space
-      \ifdefined\bibcop at nocaps--no:caps\fi\space
-      \ifdefined\bibcop at nowraps--no:wraps\fi\space
-      --latex '#1'}%
-    \message{bibcop: style checking finished for #1^^J}%
-  \else%
-    \message{bibcop: since -shell-escape is not set, no
-      style checking performed for #1^^J}%
-  \fi%
+  \iexec[maybe]{\bibcop at script\space
+    \ifdefined\bibcop at verbose--verbose\fi\space
+    \ifdefined\bibcop at notags--no:tags\fi\space
+    \ifdefined\bibcop at noinproc--no:org\fi\space
+    \ifdefined\bibcop at noinproc--no:inproc\fi\space
+    \ifdefined\bibcop at nodoi--no:doi\fi\space
+    \ifdefined\bibcop at nocaps--no:caps\fi\space
+    \ifdefined\bibcop at nowraps--no:wraps\fi\space
+    --latex '#1'}%
+  \message{bibcop: style checking finished for #1^^J}%
 }
 \makeatother
 
-
 % \begin{macro}{\bibliography}
 % Then, we re-define the |\bibliography| command:
 %    \begin{macrocode}

Modified: trunk/Master/texmf-dist/tex/latex/bibcop/bibcop.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/bibcop/bibcop.sty	2024-01-17 16:30:43 UTC (rev 69466)
+++ trunk/Master/texmf-dist/tex/latex/bibcop/bibcop.sty	2024-01-17 20:38:27 UTC (rev 69467)
@@ -31,7 +31,7 @@
 
 \NeedsTeXFormat{LaTeX2e}
 \ProvidesPackage{bibcop}
-[2024-01-16 0.0.18 Style Checker of Bibliography Files]
+[2024-01-17 0.0.19 Style Checker of Bibliography Files]
 
 
 
@@ -91,21 +91,16 @@
 \RequirePackage{shellesc}
 \makeatletter
 \newcommand\bibcop at exec[1]{
-  \ifnum\ShellEscapeStatus=1
-    \iexec{\bibcop at script\space
-      \ifdefined\bibcop at verbose--verbose\fi\space
-      \ifdefined\bibcop at notags--no:tags\fi\space
-      \ifdefined\bibcop at noinproc--no:org\fi\space
-      \ifdefined\bibcop at noinproc--no:inproc\fi\space
-      \ifdefined\bibcop at nodoi--no:doi\fi\space
-      \ifdefined\bibcop at nocaps--no:caps\fi\space
-      \ifdefined\bibcop at nowraps--no:wraps\fi\space
-      --latex '#1'}%
-    \message{bibcop: style checking finished for #1^^J}%
-  \else%
-    \message{bibcop: since -shell-escape is not set, no
-      style checking performed for #1^^J}%
-  \fi%
+  \iexec[maybe]{\bibcop at script\space
+    \ifdefined\bibcop at verbose--verbose\fi\space
+    \ifdefined\bibcop at notags--no:tags\fi\space
+    \ifdefined\bibcop at noinproc--no:org\fi\space
+    \ifdefined\bibcop at noinproc--no:inproc\fi\space
+    \ifdefined\bibcop at nodoi--no:doi\fi\space
+    \ifdefined\bibcop at nocaps--no:caps\fi\space
+    \ifdefined\bibcop at nowraps--no:wraps\fi\space
+    --latex '#1'}%
+  \message{bibcop: style checking finished for #1^^J}%
 }
 \makeatother

More information about the tex-live-commits mailing list.