diff options
Diffstat (limited to 'Master/texmf-dist/source/support/bibtexperllibs/BibTeX-Parser/t/13_output.t')
-rw-r--r-- | Master/texmf-dist/source/support/bibtexperllibs/BibTeX-Parser/t/13_output.t | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/Master/texmf-dist/source/support/bibtexperllibs/BibTeX-Parser/t/13_output.t b/Master/texmf-dist/source/support/bibtexperllibs/BibTeX-Parser/t/13_output.t index 2d2e1ebfd36..e298aa5a59e 100644 --- a/Master/texmf-dist/source/support/bibtexperllibs/BibTeX-Parser/t/13_output.t +++ b/Master/texmf-dist/source/support/bibtexperllibs/BibTeX-Parser/t/13_output.t @@ -11,13 +11,15 @@ my $fh = new IO::File "t/bibs/01.bib", "r" ; my $parser = new BibTeX::Parser $fh; + + while (my $entry = $parser->next) { if($entry->key eq 'key01') { my $result='@ARTICLE{key01, - month = {January~1}, - title = {Title text}, - author = {Duck, Donald and Else, Someone}, year = {1950}, + author = {Duck, Donald and Else, Someone}, + title = {Title text}, + month = {January~1}, }'; is($entry->to_string,$result); } @@ -25,3 +27,4 @@ while (my $entry = $parser->next) { } done_testing(); + |