diff options
Diffstat (limited to 'Master/texmf-dist/source/bibtex/biber/t/12-skips.t')
-rwxr-xr-x | Master/texmf-dist/source/bibtex/biber/t/12-skips.t | 207 |
1 files changed, 0 insertions, 207 deletions
diff --git a/Master/texmf-dist/source/bibtex/biber/t/12-skips.t b/Master/texmf-dist/source/bibtex/biber/t/12-skips.t deleted file mode 100755 index ae4f33ccb13..00000000000 --- a/Master/texmf-dist/source/bibtex/biber/t/12-skips.t +++ /dev/null @@ -1,207 +0,0 @@ -use strict; -use warnings; -use utf8; -no warnings 'utf8'; - -use Test::More tests => 16; - -use Biber; -use Biber::Utils; -use Biber::Output::BBL; -use Log::Log4perl qw(:easy); -Log::Log4perl->easy_init($ERROR); -chdir("t/tdata") ; - -my $biber = Biber->new(noconf => 1); -$biber->parse_ctrlfile('skips.bcf'); -$biber->set_output_obj(Biber::Output::BBL->new()); - -# Options - we could set these in the control file but it's nice to see what we're -# relying on here for tests - -# Biber options -Biber::Config->setoption('fastsort', 1); - -# Now generate the information -$biber->prepare; -my $out = $biber->get_output_obj; -my $section = $biber->sections->get_section(0); -my $shs = $section->get_list('SHORTHANDS'); -my $main = $section->get_list('MAIN'); -my $bibentries = $section->bibentries; - -my $set1 = q| \entry{seta}{set}{} - \set{set:membera,set:memberb,set:memberc} - \name{labelname}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \name{author}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \strng{namehash}{DJ1} - \strng{fullhash}{DJ1} - \field{labelalpha}{Doe10} - \field{sortinit}{D} - \field{extrayear}{1} - \field{labelyear}{2010} - \field{extraalpha}{1} - \field{title}{Set Member A} - \field{year}{2010} - \keyw{key1, key2} - \endentry - -|; - -my $set2 = q| \entry{set:membera}{book}{} - \inset{seta} - \name{labelname}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \name{author}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \strng{namehash}{DJ1} - \strng{fullhash}{DJ1} - \field{sortinit}{D} - \field{title}{Set Member A} - \field{year}{2010} - \keyw{key1, key2} - \endentry - -|; - -my $set3 = q| \entry{set:memberb}{book}{} - \inset{seta} - \name{labelname}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \name{author}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \strng{namehash}{DJ1} - \strng{fullhash}{DJ1} - \field{sortinit}{D} - \field{title}{Set Member B} - \field{year}{2010} - \endentry - -|; - -my $set4 = q| \entry{set:memberc}{book}{} - \inset{seta} - \name{labelname}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \name{author}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \strng{namehash}{DJ1} - \strng{fullhash}{DJ1} - \field{sortinit}{D} - \field{title}{Set Member C} - \field{year}{2010} - \endentry - -|; - -my $noset1 = q| \entry{noseta}{book}{} - \name{labelname}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \name{author}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \strng{namehash}{DJ1} - \strng{fullhash}{DJ1} - \field{labelalpha}{Doe10} - \field{sortinit}{D} - \field{extrayear}{2} - \field{labelyear}{2010} - \field{extraalpha}{2} - \field{title}{Stand-Alone A} - \field{year}{2010} - \endentry - -|; - -my $noset2 = q| \entry{nosetb}{book}{} - \name{labelname}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \name{author}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \strng{namehash}{DJ1} - \strng{fullhash}{DJ1} - \field{labelalpha}{Doe10} - \field{sortinit}{D} - \field{extrayear}{3} - \field{labelyear}{2010} - \field{extraalpha}{3} - \field{title}{Stand-Alone B} - \field{year}{2010} - \endentry - -|; - -my $noset3 = q| \entry{nosetc}{book}{} - \name{labelname}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \name{author}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \strng{namehash}{DJ1} - \strng{fullhash}{DJ1} - \field{labelalpha}{Doe10} - \field{sortinit}{D} - \field{extrayear}{4} - \field{labelyear}{2010} - \field{extraalpha}{4} - \field{title}{Stand-Alone C} - \field{year}{2010} - \endentry - -|; - -my $sk4 = q| \entry{skip4}{article}{dataonly} - \name{labelname}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \name{author}{1}{% - {{Doe}{D.}{John}{J.}{}{}{}{}}% - } - \list{location}{1}{% - {Cambridge}% - } - \list{publisher}{1}{% - {A press}% - } - \strng{namehash}{DJ1} - \strng{fullhash}{DJ1} - \field{sortinit}{D} - \field{shorthand}{AWS} - \field{title}{Algorithms Which Sort} - \field{year}{1932} - \endentry - -|; - -is_deeply([$shs->get_keys], ['skip1'], 'skiplos - not in LOS'); -is($bibentries->entry('skip1')->get_field('options'), 'skipbib', 'Passing skipbib through'); -is($bibentries->entry('skip2')->get_field('labelalpha'), 'SA', 'Normal labelalpha'); -is($bibentries->entry('skip2')->get_field($bibentries->entry('skip2')->get_field('labelyearname')), '1995', 'Normal labelyear'); -ok(is_undef($bibentries->entry('skip3')->get_field('labelalpha')), 'skiplab - no labelalpha'); -ok(is_undef($bibentries->entry('skip3')->get_field('labelyearname')), 'skiplab - no labelyear'); -ok(is_undef($bibentries->entry('skip4')->get_field('labelalpha')), 'dataonly - no labelalpha'); -is($out->get_output_entry($main,'skip4'), $sk4, 'dataonly - checking output'); -ok(is_undef($bibentries->entry('skip4')->get_field('labelyearname')), 'dataonly - no labelyear'); -is($out->get_output_entry($main,'seta'), $set1, 'Set parent - with labels'); -is($out->get_output_entry($main,'set:membera'), $set2, 'Set member - no labels 1'); -is($out->get_output_entry($main,'set:memberb'), $set3, 'Set member - no labels 2'); -is($out->get_output_entry($main,'set:memberc'), $set4, 'Set member - no labels 3'); -is($out->get_output_entry($main,'noseta'), $noset1, 'Not a set member - extrayear continues from set 1'); -is($out->get_output_entry($main,'nosetb'), $noset2, 'Not a set member - extrayear continues from set 2'); -is($out->get_output_entry($main,'nosetc'), $noset3, 'Not a set member - extrayear continues from set 3'); - -unlink <*.utf8>; |