diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2008-05-06 16:05:13 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2008-05-06 16:05:13 +0000 |
commit | 5b808c8bfaf6e3f45fbbb4b040dd0b73ff24c4fa (patch) | |
tree | 277b28f247733042ce4ec581784c0a4a6e5fe877 | |
parent | 8d2413e9dda1808dbb1fdd477fe3b4a1c6c43b58 (diff) | |
download | spec-helper-5b808c8bfaf6e3f45fbbb4b040dd0b73ff24c4fa.tar spec-helper-5b808c8bfaf6e3f45fbbb4b040dd0b73ff24c4fa.tar.gz spec-helper-5b808c8bfaf6e3f45fbbb4b040dd0b73ff24c4fa.tar.bz2 spec-helper-5b808c8bfaf6e3f45fbbb4b040dd0b73ff24c4fa.tar.xz spec-helper-5b808c8bfaf6e3f45fbbb4b040dd0b73ff24c4fa.zip |
use a better function name
-rwxr-xr-x | strip_files | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/strip_files b/strip_files index 43ab258..2df2a8b 100755 --- a/strip_files +++ b/strip_files @@ -21,7 +21,7 @@ my $exclude_pattern = join('|', $exclude_pattern = qr/$exclude_pattern/; my (@shared_libs, @executables, @static_libs); -find(\&testfile, $buildroot); +find(\&keep_wanted, $buildroot); system( "strip", @@ -38,7 +38,7 @@ sub expensive_test { # Check if a file is an elf binary, shared library, or static library, # for use by File::Find. It'll fill the following 3 arrays with anything # it finds: -sub testfile() { +sub keep_wanted() { # skip symlinks return if -l $_; # skip directories |