our %patches;
-use Data::Dumper;
-
foreach_patch($relatedto || $leaves || !$spec ? { } : $spec,
$deleted || $deleted_only,
[qw(B_deps +included)],
sub {
my ($patch,$parsedname,$meta) = @_;
-
-print Dumper($parsedname);
$patches{$patch}{Meta} = $meta;
$patches{$patch}{ParsedName} = $parsedname;
$patches{$patch}{Deps} =