aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGuillaume Rousse <guillomovitch@mandriva.org>2008-02-10 14:11:25 +0000
committerGuillaume Rousse <guillomovitch@mandriva.org>2008-02-10 14:11:25 +0000
commit2336ed0ee0e4410c7adfc10159de94dc1a29aa58 (patch)
treeec1abb5b0a201c1d34b9d19a760e132fd3cb3a7e
parent845b81230df49ba65bd97d62fefc844f921a06bd (diff)
downloadspec-helper-2336ed0ee0e4410c7adfc10159de94dc1a29aa58.tar
spec-helper-2336ed0ee0e4410c7adfc10159de94dc1a29aa58.tar.gz
spec-helper-2336ed0ee0e4410c7adfc10159de94dc1a29aa58.tar.bz2
spec-helper-2336ed0ee0e4410c7adfc10159de94dc1a29aa58.tar.xz
spec-helper-2336ed0ee0e4410c7adfc10159de94dc1a29aa58.zip
no need to duplicate variable
-rwxr-xr-xstrip_files8
1 files changed, 3 insertions, 5 deletions
diff --git a/strip_files b/strip_files
index 50a57ef..37c525d 100755
--- a/strip_files
+++ b/strip_files
@@ -33,13 +33,11 @@ sub testfile() {
# skip excluded files
return if $File::Find::name =~ $exclude_pattern;
- my $fn = "$File::Find::dir/$_";
-
# Does its filename look like a shared library?
if (m/\.so/) {
# Ok, do the expensive test.
if (expensive_test($_) =~ m/ELF.*shared/) {
- push @executables, $fn;
+ push @executables, $File::Find::name;
return;
}
}
@@ -49,14 +47,14 @@ sub testfile() {
if ($mode & 0111) {
# Ok, expensive test.
if (expensive_test($_) =~ m/ELF.*executable/) {
- push @executables, $fn;
+ push @executables, $File::Find::name;
return;
}
}
# Is it a static library, and not a debug library?
if (m/lib.*\.a/ && ! m/_g\.a/) {
- push @static_libs, $fn;
+ push @static_libs, $File::Find::name;
return;
}
}