1 |
slords |
1.1 |
diff -Nur -x '*.orig' -x '*.rej' e-smith-lib-1.18.0/root/usr/lib/perl5/site_perl/esmith/util.pm mezzanine_patched_e-smith-lib-1.18.0/root/usr/lib/perl5/site_perl/esmith/util.pm |
2 |
|
|
--- e-smith-lib-1.18.0/root/usr/lib/perl5/site_perl/esmith/util.pm 2007-01-26 18:51:29.000000000 -0700 |
3 |
|
|
+++ mezzanine_patched_e-smith-lib-1.18.0/root/usr/lib/perl5/site_perl/esmith/util.pm 2007-05-21 21:19:55.000000000 -0600 |
4 |
|
|
@@ -290,7 +290,7 @@ |
5 |
|
|
|
6 |
|
|
# first, calculate the prefix (/??) given the netmask |
7 |
|
|
my $len = 0; |
8 |
|
|
- for ( my $bits = $netmaskBits ; $bits ; $bits <<= 1 ) |
9 |
|
|
+ for ( my $bits = $netmaskBits ; $bits & 0xFFFFFFFF ; $bits <<= 1 ) |
10 |
|
|
{ |
11 |
|
|
$len++; |
12 |
|
|
} |