Revert "Merge remote branch 't0m/json' into json"
[catagits/Gitalist.git] / lib / Gitalist / Git / Types.pm
index 5cca578..af12bbc 100644 (file)
@@ -1,16 +1,8 @@
 package Gitalist::Git::Types;
 
 use MooseX::Types
-    -declare => [qw/
-        SHA1
-        DateTime
-        Dir
-    /];
+    -declare => [qw/SHA1/];
 
-use MooseX::Types::Path::Class;
-use MooseX::Types::ISO8601 qw/ISO8601DateTimeStr/;
-use MooseX::Types::DateTime ();
-use MooseX::Storage::Engine ();
 use MooseX::Types::Common::String qw/NonEmptySimpleStr/;
 
 subtype SHA1,
@@ -22,34 +14,4 @@ coerce SHA1,
     from NonEmptySimpleStr,
     via { 1 };
 
-subtype DateTime,
-    as 'MooseX::Types::DateTime::DateTime',
-    where { 1 };
-
-MooseX::Storage::Engine->add_custom_type_handler(
-    DateTime,
-        expand   => sub {
-            my $val = shift;
-            Carp::confess("Not implemented");
-        },
-        collapse => sub {
-            to_ISO8601DateTimeStr(shift);
-        },
-);
-
-subtype Dir,
-    as 'MooseX::Types::Path::Class::Dir',
-    where { 1 };
-
-MooseX::Storage::Engine->add_custom_type_handler(
-    Dir,
-        expand   => sub {
-            my $val = shift;
-            Carp::confess("Not implemented");
-        },
-        collapse => sub {
-            shift() . '';
-        },
-);
-
 1;