Carton-v1.0.21HEADCarton-v1.0.21master

1 files changed, 23 insertions, 0 deletions

diff --git a/lib/Carton/Dist/Core.pm b/lib/Carton/Dist/Core.pm
new file mode 100644
index 0000000..760ce66
--- /dev/null
+++ b/lib/Carton/Dist/Core.pm
@@ -0,0 +1,23 @@
+package Carton::Dist::Core;
+use strict;
+use parent 'Carton::Dist';
+
+use Class::Tiny qw( module_version );
+
+sub BUILDARGS {
+    my($class, %args) = @_;
+
+    # TODO represent dual-life
+    $args{name} =~ s/::/-/g;
+
+    \%args;
+}
+
+sub is_core { 1 }
+
+sub version_for {
+    my($self, $module) = @_;
+    $self->module_version;
+}
+
+1;