Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

22 lines (14 sloc) 0.408 kB
use strict;
use warnings;
use Test::More;
use VegGuide::Keywords;
my $kw = VegGuide::Keywords->new();
$kw->add('thing');
my @kw = $kw->all();
is( scalar @kw, 1, 'one keyword returned' );
is( $kw[0], 'thing', 'first keyword is thing' );
$kw->add('blue');
@kw = $kw->all();
is( scalar @kw, 2, 'two keywords returned' );
is( $kw[1], 'blue', 'second keyword is blue' );
done_testing();
Jump to Line
Something went wrong with that request. Please try again.