cleanup for sharing

3 files changed, 0 insertions, 68 deletions

diff --git a/lib/Net/Hawk/Role/WithCrypto.pm b/lib/Net/Hawk/Role/WithCrypto.pm
deleted file mode 100644
index d8d95e9..0000000
--- a/lib/Net/Hawk/Role/WithCrypto.pm
+++ /dev/null
@@ -1,24 +0,0 @@
-package Net::Hawk::Role::WithCrypto;
-use strict;
-use warnings;
-use 5.010;
-use Package::Variant
-    importing => ['Moo::Role'],
-    subs => ['has'];
-use Types::Standard 1.000003 qw(HasMethods);
-
-sub make_variant {
-    my ($class,$target_package,@methods) = @_;
-
-    has _crypto => (
-        is => 'ro',
-        (@methods ? ( isa => HasMethods[@methods] ) : () ),
-        init_arg => 'crypto',
-        default => sub {
-            require Net::Hawk::Crypto;
-            Net::Hawk::Crypto->new;
-        },
-    );
-}
-
-1;
diff --git a/lib/Net/Hawk/Role/WithUtils.pm b/lib/Net/Hawk/Role/WithUtils.pm
deleted file mode 100644
index bd3a95d..0000000
--- a/lib/Net/Hawk/Role/WithUtils.pm
+++ /dev/null
@@ -1,24 +0,0 @@
-package Net::Hawk::Role::WithUtils;
-use strict;
-use warnings;
-use 5.010;
-use Package::Variant
-    importing => ['Moo::Role'],
-    subs => ['has'];
-use Types::Standard 1.000003 qw(HasMethods);
-
-sub make_variant {
-    my ($class,$target_package,@methods) = @_;
-
-    has _utils => (
-        is => 'ro',
-        (@methods ? ( isa => HasMethods[@methods] ) : () ),
-        init_arg => 'utils',
-        default => sub {
-            require Net::Hawk::Utils;
-            Net::Hawk::Utils->new;
-        },
-    );
-}
-
-1;
diff --git a/lib/Net/Hawk/Types.pm b/lib/Net/Hawk/Types.pm
deleted file mode 100644
index 8879bb3..0000000
--- a/lib/Net/Hawk/Types.pm
+++ /dev/null
@@ -1,20 +0,0 @@
-package Net::Hawk::Types;
-use strict;
-use warnings;
-use 5.010;
-use Type::Library
-    -base,
-    -declare => qw(Algorithm HTTPHeaders);
-use Type::Utils -all;
-use Types::Standard qw(Str Enum HashRef ArrayRef);
-
-declare Algorithm, as Enum[qw(sha1 sha256)];
-
-class_type HTTPHeaders, { class => 'HTTP::Headers' };
-coerce HTTPHeaders,
-    from HashRef, via { require HTTP::Headers; HTTP::Headers->new(%$_) },
-    from ArrayRef, via { require HTTP::Headers; HTTP::Headers->new(@$_) },
-    ;
-
-1;
-