diff options
author | Ingo Schmidt <is@openoffice.org> | 2010-07-02 15:42:56 +0200 |
---|---|---|
committer | Ingo Schmidt <is@openoffice.org> | 2010-07-02 15:42:56 +0200 |
commit | 5908513b963ced9f6d05add286cef70010d51d05 (patch) | |
tree | dcf16d541b090b98e14db537c15129ae035789ec /setup_native/scripts | |
parent | CWS-TOOLING: integrate CWS mingwport30 (diff) | |
download | core-5908513b963ced9f6d05add286cef70010d51d05.tar.gz core-5908513b963ced9f6d05add286cef70010d51d05.zip |
native317 #i112444# directories below optional components
Diffstat (limited to 'setup_native/scripts')
-rw-r--r-- | setup_native/scripts/admin.pl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/setup_native/scripts/admin.pl b/setup_native/scripts/admin.pl index 89588d0c4d03..f5f2d207b5ed 100644 --- a/setup_native/scripts/admin.pl +++ b/setup_native/scripts/admin.pl @@ -785,6 +785,12 @@ sub create_directory_structure foreach $dir (@startparents) { create_directory_tree($dir, \%fullpathhash, $targetdir, $dirhash); } + # Also adding the pathes of the startparents + foreach $dir (@startparents) + { + if ( ! exists($fullpathhash{$dir}) ) { $fullpathhash{$dir} = $targetdir; } + } + return \%fullpathhash; } |