Skip to content

Commit 81b50ef

Browse files
committed
crossrefware (23jun26)
git-svn-id: svn://tug.org/texlive/trunk/Build/source@79457 c570f23f-e606-0410-a88d-b1316a301751
1 parent 21adc41 commit 81b50ef

5 files changed

Lines changed: 11 additions & 10 deletions

File tree

texk/texlive/linked_scripts/crossrefware/bbl2bib.pl

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -86,7 +86,7 @@ =head1 AUTHOR
8686
8787
=head1 COPYRIGHT AND LICENSE
8888
89-
Copyright (C) 2014-2021 Boris Veytsman
89+
Copyright (C) 2014-2026 Boris Veytsman
9090
9191
This is free software. You may redistribute copies of it under the
9292
terms of the GNU General Public License

texk/texlive/linked_scripts/crossrefware/bibdoiadd.pl

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -98,7 +98,7 @@ =head1 AUTHOR
9898
9999
=head1 COPYRIGHT AND LICENSE
100100
101-
Copyright (C) 2014-2025 Boris Veytsman
101+
Copyright (C) 2014-2026 Boris Veytsman
102102
103103
This is free software. You may redistribute copies of it under the
104104
terms of the GNU General Public License

texk/texlive/linked_scripts/crossrefware/bibmradd.pl

Lines changed: 7 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -258,21 +258,22 @@ sub GetMr {
258258
print "DEBUG: response $response\n";
259259
}
260260

261-
$response =~ s/\|.*//;
262-
if (length($response == 0)) {
261+
my @vals = split /\|/, $response;
262+
my $mr = $vals[9];
263+
if (length($mr) == 0) {
263264
if ($debug) {
264265
print STDERR "Did not get MR\n";
265266
}
266267
return("");
267268
}
268269
269270
# Somehow mref deletes leading zeros. They are needed!
270-
while (length($response)<7) {
271-
$response = "0$response";
271+
while (length($mr)<7) {
272+
$mr = "0$mr";
272273
}
273274
if ($debug) {
274-
print STDERR "DEBUG: got MR: $response\n",
275+
print STDERR "DEBUG: got MR: $mr\n",
275276
}
276-
return $response;
277+
return $mr;
277278
278279
}

texk/texlive/linked_scripts/crossrefware/biburl2doi.pl

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -39,7 +39,7 @@ =head1 AUTHOR
3939
4040
=head1 COPYRIGHT AND LICENSE
4141
42-
Copyright (C) 2021 Boris Veytsman
42+
Copyright (C) 2021-2026 Boris Veytsman
4343
4444
This is free software. You may redistribute copies of it under the
4545
terms of the GNU General Public License

texk/texlive/linked_scripts/crossrefware/ltx2crossrefxml.pl

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -310,7 +310,7 @@ =head1 AUTHOR
310310
311311
=head1 COPYRIGHT AND LICENSE
312312
313-
Copyright (C) 2012-2025 Boris Veytsman
313+
Copyright (C) 2012-2026 Boris Veytsman
314314
315315
This is free software. You may redistribute copies of it under the
316316
terms of the GNU General Public License (any version)

0 commit comments

Comments
 (0)