use strict;
use blib;
-use Test::More tests => 352;
+use Test::More tests => 351;
BEGIN {
use_ok( 'WebPAC::Test' );
_set_ds( $rec1 );
- is_deeply( get_ds, $rec1, 'get_ds' );
-
cmp_ok( join(",", rec2('200','a') ), 'eq', '200a,200a*2', 'join rec2' );
cmp_ok( join(",", rec2('200','a'), rec2('200','b') ), 'eq', '200a,200a*2,200b', 'join rec2 rec2' );
cmp_ok( join(" * ", sort(rec1('200'), rec1('201') )), 'eq', '200a * 200a*2 * 200b * 200c * 200d * 200d*2 * 201x * 201y', 'join sort rec1 rec1' );