From 95f00ddf760ddf2b603b25131f166c448817c98e Mon Sep 17 00:00:00 2001 From: Tatsuhiko Miyagawa Date: Wed, 7 Aug 2013 19:40:19 -0700 Subject: Set module name for ::Core dist --- lib/Carton/Dist/Core.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lib/Carton/Dist/Core.pm b/lib/Carton/Dist/Core.pm index c19957f..16e0f85 100644 --- a/lib/Carton/Dist/Core.pm +++ b/lib/Carton/Dist/Core.pm @@ -8,7 +8,8 @@ has module_version => (is => 'ro'); sub BUILDARGS { my($class, %args) = @_; - $args{name} = "perl-$]"; + # TODO represent dual-life + $args{name} =~ s/::/-/g; \%args; } -- cgit v1.2.1