Permalink
Browse files

remove unused Features.pm

  • Loading branch information...
1 parent 37ab8f6 commit d906becf4af4e51780b075bec4fd9e83efac2a92 @miyagawa committed Sep 19, 2013
Showing with 0 additions and 35 deletions.
  1. +0 −1 lib/Module/CPANfile.pm
  2. +0 −34 lib/Module/CPANfile/Features.pm
View
1 lib/Module/CPANfile.pm
@@ -4,7 +4,6 @@ use warnings;
use Cwd;
use Carp ();
use Module::CPANfile::Environment;
-use Module::CPANfile::Features;
use Module::CPANfile::Requirement;
our $VERSION = '1.0900';
View
34 lib/Module/CPANfile/Features.pm
@@ -1,34 +0,0 @@
-package Module::CPANfile::Features;
-use strict;
-use Carp ();
-use CPAN::Meta::Feature;
-
-sub new {
- my($class, $features) = @_;
- bless { features => $features }, $class;
-}
-
-sub identifiers {
- my $self = shift;
- keys %{$self->{features}};
-}
-
-sub all {
- my $self = shift;
- map $self->get($_), $self->identifiers;
-}
-
-sub get {
- my($self, $identifier) = @_;
-
- my $data = $self->{features}{$identifier}
- or Carp::croak("Unknown feature '$identifier'");
-
- CPAN::Meta::Feature->new($data->{identifier}, {
- description => $data->{description},
- prereqs => $data->{prereqs},
- });
-}
-
-1;
-

0 comments on commit d906bec

Please sign in to comment.