trunk/t/Sack.t

#!/usr/bin/perl

use Test::More tests => 7;

use lib 'lib';

BEGIN {
        use_ok( 'Sack' );
        use_ok( 'Sack::Node' );
}

ok( duration( $_ ), 'duration' ) foreach ( 1 .. 5 );

1	dpavlin	135	#!/usr/bin/perl
2
3	dpavlin	153	use Test::More tests => 7;
4	dpavlin	135
5			use lib 'lib';
6
7			BEGIN {
8			use_ok( 'Sack' );
9	dpavlin	153	use_ok( 'Sack::Node' );
10	dpavlin	135	}
11
12			ok( duration( $_ ), 'duration' ) foreach ( 1 .. 5 );
13