From: Jim Meyering <jim@meyering.net>
Date: Tue, 6 Feb 2001 09:03:47 +0000 (+0000)
Subject: move decl of q into loop
X-Git-Tag: FILEUTILS-4_0_39~13
X-Git-Url: http://git.ipfire.org/gitweb/index.cgi?a=commitdiff_plain;h=871c0f6caaaa75628ac74b5ca73f8e5240ebb6e1;p=thirdparty%2Fcoreutils.git

move decl of q into loop
---

diff --git a/src/wheel-gen.pl b/src/wheel-gen.pl
index fe6157d62d..ab40c99d09 100755
--- a/src/wheel-gen.pl
+++ b/src/wheel-gen.pl
@@ -26,10 +26,9 @@ sub is_prime ($)
 
   my $d = 2;
   my $w = 1;
-  my $q;
   while (1)
     {
-      $q = $n / $d;
+      my $q = $n / $d;
       ($n == $q * $d)
         and return 0;
       $d += $w;