The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!perl -w
# $Id$
use strict;

use Test::More;
plan tests => 1;

use CPAN::FindDependencies 'finddeps';

is_deeply(
    {
     map {
         $_->name() => [$_->depth(), $_->distribution(), $_->warning() ? 1 : 0]
       }
       finddeps(
               'HTML::Parser',
               '02packages' =>
                 't/cache/CPAN-FindDependencies-1.1/02packages.details.txt.gz',
               cachedir    => 't/cache/CPAN-FindDependencies-1.1',
               nowarnings  => 1,
               perl        => 5.008008,
               maxdepth    => 1,
               recommended => 1
       )
    },
    {
            'HTTP::Headers' => [1, 'G/GA/GAAS/libwww-perl-5.808.tar.gz',    1],
            'HTML::Tagset'  => [1, 'P/PE/PETDANCE/HTML-Tagset-3.20.tar.gz', 0],
            'HTML::Parser'  => [0, 'G/GA/GAAS/HTML-Parser-3.60.tar.gz',     0]
    },
    "recommended flag works"
);