From 81fc5ea28a52ba66ce3c8675c3b0bc01949ca3fa Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?R=C3=BCdiger=20Timm?= Date: Wed, 31 Jan 2007 07:41:55 +0000 Subject: [PATCH] INTEGRATION: CWS macosxmapfiles (1.108.70); FILE MERGED 2007/01/25 21:14:30 tra 1.108.70.6: #i69351# use strip -x on Mac OS X PPC too 2007/01/24 08:27:33 tra 1.108.70.5: #69351#Improve detection of executables and dylibs on Mac OS X 2007/01/21 13:55:46 tra 1.108.70.4: RESYNC: (1.110-1.111); FILE MERGED 2007/01/12 16:07:21 tra 1.108.70.3: #i69351# revert erroneously out commenting of line conaining = 'strip' 2007/01/11 08:57:36 tra 1.108.70.2: RESYNC: (1.108-1.110); FILE MERGED 2007/01/11 08:36:10 tra 1.108.70.1: #69351# --- solenv/bin/deliver.pl | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/solenv/bin/deliver.pl b/solenv/bin/deliver.pl index 4fe4f7f18d3e..5847d87a5834 100755 --- a/solenv/bin/deliver.pl +++ b/solenv/bin/deliver.pl @@ -7,9 +7,9 @@ eval 'exec perl -wS $0 ${1+"$@"}' # # $RCSfile: deliver.pl,v $ # -# $Revision: 1.112 $ +# $Revision: 1.113 $ # -# last change: $Author: obo $ $Date: 2007-01-25 12:48:29 $ +# last change: $Author: rt $ $Date: 2007-01-31 08:41:55 $ # # The Contents of this file are made available subject to # the terms of GNU Lesser General Public License Version 2.1. @@ -51,7 +51,7 @@ use File::Spec; ( $script_name = $0 ) =~ s/^.*\b(\w+)\.pl$/$1/; -$id_str = ' $Revision: 1.112 $ '; +$id_str = ' $Revision: 1.113 $ '; $id_str =~ /Revision:\s+(\S+)\s+\$/ ? ($script_rev = $1) : ($script_rev = "-"); @@ -147,6 +147,7 @@ if ( ! $opt_delete ) { } else { if ((!defined $ENV{DISABLE_STRIP}) || ($ENV{DISABLE_STRIP} eq "")) { $strip = 'strip'; + $strip .= " -x" if ($ENV{OS} eq 'MACOSX'); $strip .= " -R '.comment' -s" if ($ENV{OS} eq 'LINUX'); } } @@ -732,7 +733,7 @@ sub is_unstripped { if (-f $file_name.$maybedot) { my $file_type = `file $file_name`; # OS X file command doesn't know if a file is stripped or not - if (($file_type =~ /not stripped/o) || ($file_type =~ /Mach-O executable/o)) { + if (($file_type =~ /not stripped/o) || ($file_type =~ /Mach-O/o)) { return '1' if ($file_name =~ /\.bin$/o); return '1' if ($file_name =~ /\.so\.*/o); return '1' if ($file_name =~ /\.dylib\.*/o);