Changeset 11753 for lang/perl/Acme-CPANAuthors
- Timestamp:
- 05/17/08 17:38:45 (6 months ago)
- Files:
-
- 1 modified
-
lang/perl/Acme-CPANAuthors/trunk/t/02_standalone.t (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
lang/perl/Acme-CPANAuthors/trunk/t/02_standalone.t
r11294 r11753 7 7 my %authors = Acme::CPANAuthors::Test->authors; 8 8 9 ok (scalar keys %authors ) == 1;9 ok (scalar keys %authors == 1 ); 10 10 11 11 # note that this requires parentheses 12 ok (Acme::CPANAuthors::Test->authors->{ISHIGAKI} ) eq 'Kenichi Ishigaki';12 ok (Acme::CPANAuthors::Test->authors->{ISHIGAKI} eq 'Kenichi Ishigaki'); 13 13 14 14 foreach my $name ( keys %{ Acme::CPANAuthors::Test->authors } ) {
![(please configure the [header_logo] section in trac.ini)](/share/chrome/site/your_project_logo.png)