Changeset 20920

Timestamp:

10/07/08 20:06:03 (2 months ago)

Author:

yappo

Message:

正しいpathにスケルトンdirを作る

Files:

• lang/perl/Module-Setup/trunk/lib/Module/Setup.pm (modified) (1 diff)

lang/perl/Module-Setup/trunk/lib/Module/Setup.pm

@@ -368 +368 @@
     $self->call_trigger( after_setup_module_attribute => $module_attribute);
 
-    $self->create_directory( dir => $module_attribute->{dist_name} );
+    $self->create_directory( dir => Path::Class::Dir->new(@{ $module_attribute->{dist_path} }) );
 
     my $template_vars = {