From: Taku Amano <taku@toi-planning.net>
Date: Sun, 26 Apr 2009 21:22:33 +0000 (+0900)
Subject: An unnecessary directory was deleted from the package.
X-Git-Url: http://git.osdn.net/view?p=mt-acme%2FGrass.git;a=commitdiff_plain;h=0c58c5e7cc579e906f5758520eefe42e9472a65b

An unnecessary directory was deleted from the package.
---

diff --git a/Build.PL b/Build.PL
index cad1022..3661bb5 100644
--- a/Build.PL
+++ b/Build.PL
@@ -76,9 +76,6 @@ my $class = Module::Build->subclass(
 			my $plugins = File::Spec->catfile($dist_dir, 'plugins');
 			mkpath($plugins, 1, 0755);
 
-			my $static = File::Spec->catfile($dist_dir, 'mt-static/plugins');
-			mkpath($static, 1, 0755);
-
 			my $new_dist_dir = File::Spec->catfile(
 				$plugins, $self->{properties}{dist_name}
 			);
@@ -89,8 +86,16 @@ my $class = Module::Build->subclass(
 			}
 
 			if (my @statics = glob(File::Spec->catfile($new_dist_dir, 'static/*'))) {
-				my $d = File::Spec->catfile($static, $self->{properties}{dist_name});
+				my $static = File::Spec->catfile(
+					$dist_dir, 'mt-static/plugins'
+				);
+				mkpath($static, 1, 0755);
+
+				my $d = File::Spec->catfile(
+					$static, $self->{properties}{dist_name}
+				);
 				mkpath($d, 1, 0755);
+
 				foreach my $f (@statics) {
 					rename($f, File::Spec->catfile($d, basename($f)));
 				}