Author: djpig
Date: 2008-06-20 01:10:30 +0200 (Fri, 20 Jun 2008)
New Revision: 1404

Modified:
   trunk/checks/binaries
Log:
* checks/binaries:
  + Remove unneeded temporary variable


Modified: trunk/checks/binaries
===================================================================
--- trunk/checks/binaries       2008-06-19 23:07:05 UTC (rev 1403)
+++ trunk/checks/binaries       2008-06-19 23:10:30 UTC (rev 1404)
@@ -261,7 +261,6 @@
     }
 
     # statically linked?
-    my @needed;
     if (!exists($NEEDED{$file}) || !defined($NEEDED{$file})) {
        if ($info =~ m/shared object/o) {
             # Some exceptions: detached debugging information and the dynamic
@@ -285,8 +284,7 @@
        my $lib;
        my $no_libc = 1;
        $needs_depends_line = 1;
-       @needed = @{$NEEDED{$file}};
-       for $lib (@needed) {
+       for $lib (@{$NEEDED{$file}}) {
            if ($lib =~ /^libc\.so\.(\d+.*)/) {
                $needs_libc = "libc$1";
                $needs_libc_file = $file unless $needs_libc_file;


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Reply via email to