From 495cadc6ef6c09b355b4da7f6f1354e89f643133 Mon Sep 17 00:00:00 2001
From: Chmouel Boudjnah <chmouel@mandriva.org>
Date: Thu, 20 Jul 2000 19:07:22 +0000
Subject: Clean up.

---
 strip_files | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

(limited to 'strip_files')

diff --git a/strip_files b/strip_files
index 1b884a9..1178ad2 100755
--- a/strip_files
+++ b/strip_files
@@ -16,9 +16,10 @@ use File::Find;
 # for use by File::Find. It'll fill the following 3 arrays with anything
 # it finds:
 my (@shared_libs, @executables, @static_libs);
-my $exclude_files=defined($ENV{EXCLUDE_FROM_STRIP}) ? split(' ',$ENV{EXCLUDE_FROM_STRIP}) : ();
+my $exclude_files=defined($ENV{EXCLUDE_FROM_STRIP}) ? split(' ',$ENV{EXCLUDE_FROM_STRIP}) : undef;
 
 sub testfile {
+
     return if -l $_ or -d $_; # Skip directories and symlinks always.
 
     $fn="$File::Find::dir/$_";
@@ -76,8 +77,4 @@ foreach (@executables) {
     system("strip","--remove-section=.comment","--remove-section=.note",$_);
 }
 
-# foreach (@static_libs) {
-#     system("strip","--strip-debug",$_);
-# }
-
 # strip_files ends here
-- 
cgit v1.2.1