diff options
| author | Oliver Bolte <obo@openoffice.org> | 2007-07-19 06:16:23 +0000 |
|---|---|---|
| committer | Oliver Bolte <obo@openoffice.org> | 2007-07-19 06:16:23 +0000 |
| commit | 12016f677ab057da015344818d741329c2971383 (patch) | |
| tree | a42d344ea4ffe3cf988bfd7bee5a41a4b1f15776 | |
| parent | eba4eda831f5ed9eb91f4931b261ee72e04cccff (diff) | |
INTEGRATION: CWS native84 (1.7.672); FILE MERGED
2007/05/24 07:40:50 obr 1.7.672.1: make_installer.pl: #i77418#
disable >>not supported<< check for Solaris
copyproject.pm: #i77418#
added support for UnixRights property
| -rw-r--r-- | solenv/bin/modules/installer/copyproject.pm | 18 |
1 files changed, 15 insertions, 3 deletions
diff --git a/solenv/bin/modules/installer/copyproject.pm b/solenv/bin/modules/installer/copyproject.pm index 1d24e7f9f6ad..2d3348a8682a 100644 --- a/solenv/bin/modules/installer/copyproject.pm +++ b/solenv/bin/modules/installer/copyproject.pm @@ -4,9 +4,9 @@ # # $RCSfile: copyproject.pm,v $ # -# $Revision: 1.7 $ +# $Revision: 1.8 $ # -# last change: $Author: rt $ $Date: 2005-09-08 09:00:51 $ +# last change: $Author: obo $ $Date: 2007-07-19 07:16:23 $ # # The Contents of this file are made available subject to # the terms of GNU Lesser General Public License Version 2.1. @@ -82,6 +82,12 @@ sub copy_project my $localcall = "chmod 775 $destination \>\/dev\/null 2\>\&1"; system($localcall); } + + if ( $onefile->{'UnixRights'} ) + { + my $localcall = "chmod $onefile->{'UnixRights'} $destination \>\/dev\/null 2\>\&1"; + system($localcall); + } } # copy ScpActions @@ -100,6 +106,12 @@ sub copy_project my $localcall = "chmod 775 $destination \>\/dev\/null 2\>\&1"; system($localcall); } + + if ( $onefile->{'UnixRights'} ) + { + my $localcall = "chmod $onefile->{'UnixRights'} $destination \>\/dev\/null 2\>\&1"; + system($localcall); + } } # Analyzing the log file @@ -111,4 +123,4 @@ sub copy_project exit(0); } -1;
\ No newline at end of file +1; |