whoops, forgot to switch key - now intermediate dirs work

perlancar · Jun 11, 2010 · 8e0d81e · 8e0d81e
1 parent 741a7d5
commit 8e0d81e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/App/perlmv.pm b/lib/App/perlmv.pm
@@ -381,7 +381,7 @@ sub process_item {
     unless ($self->{dry_run}) {
         my $res;
 
-        if ($self->{'create_intermediate_dirs'}) {
+        if ($self->{'parents'}) {
             my ($vol, $dir, $file) = File::Spec->splitpath($new);
             unless (-e $dir) {
                 make_path($dir, {error => \my $err});