diff options
| -rw-r--r-- | util/mvdir.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/util/mvdir.pl b/util/mvdir.pl index b88cab28..53acd9b3 100644 --- a/util/mvdir.pl +++ b/util/mvdir.pl @@ -15,7 +15,8 @@ if( !-e $fromdir ){ exit; } -mkdir $todir; +mkdir($todir, 0755); + chdir $fromdir; foreach( <*> ){ next if( /^\./ ); |