From 3769a3e704759d87832efcd18bb9d1cfc8067f5f Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 30 Apr 2018 22:44:49 +0000 Subject: bibtexperllibs (30apr18) git-svn-id: svn://tug.org/texlive/trunk@47520 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser.pm | 4 ++-- Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser/Author.pm | 6 +++--- Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser/Entry.pm | 4 ++-- 3 files changed, 7 insertions(+), 7 deletions(-) (limited to 'Master/texmf-dist/scripts/bibtexperllibs') diff --git a/Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser.pm b/Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser.pm index 27cb9145829..2eac696a049 100644 --- a/Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser.pm +++ b/Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser.pm @@ -1,6 +1,6 @@ package BibTeX::Parser; { - $BibTeX::Parser::VERSION = '1.01'; + $BibTeX::Parser::VERSION = '1.02'; } # ABSTRACT: A pure perl BibTeX parser use warnings; @@ -345,7 +345,7 @@ L =head1 VERSION -version 1.01 +version 1.02 =head1 AUTHOR diff --git a/Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser/Author.pm b/Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser/Author.pm index a0ffb455be4..7d5274d1d70 100644 --- a/Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser/Author.pm +++ b/Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser/Author.pm @@ -1,6 +1,6 @@ package BibTeX::Parser::Author; { - $BibTeX::Parser::Author::VERSION = '1.01'; + $BibTeX::Parser::Author::VERSION = '1.02'; } use warnings; @@ -263,7 +263,7 @@ sub to_string { my $self = shift; if ($self->jr) { - return $self->von . " " . $self->last . ", " . $self->jr . ", " . $self->first; + return ($self->von ? $self->von . " " : '') . " " . $self->last . ", " . $self->jr . ", " . $self->first; } else { return ($self->von ? $self->von . " " : '') . $self->last . ($self->first ? ", " . $self->first : ''); } @@ -393,7 +393,7 @@ the following token is not: C<{von}> =head1 VERSION -version 1.01 +version 1.02 =head1 AUTHOR diff --git a/Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser/Entry.pm b/Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser/Entry.pm index 6d3b0ec81a8..2b8fe76220a 100644 --- a/Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser/Entry.pm +++ b/Master/texmf-dist/scripts/bibtexperllibs/BibTeX/Parser/Entry.pm @@ -1,6 +1,6 @@ package BibTeX::Parser::Entry; { - $BibTeX::Parser::Entry::VERSION = '1.01'; + $BibTeX::Parser::Entry::VERSION = '1.02'; } use warnings; @@ -415,7 +415,7 @@ Can take values 'Uppercase' (the default), 'Lowercase' or 'Titlecase' =head1 VERSION -version 1.01 +version 1.02 =head1 AUTHOR -- cgit v1.2.3