Benny Pedersen
2011-11-22 08:24:28 UTC
Hello All!
would maintainers add this perl script to cpan ?
so it does not invalidate my ebuild md5 checksum, or can i get a md5 stable
file to make ebuilds to, updates is fine but i need to make new ebuild update
to sync md5 as it is now :(
----- binkd-20111120.patch begins -----
diff -urp 2//binkd-1.0/misc/nodelist.pl 1//binkd-1.0/misc/nodelist.pl
--- 2//binkd-1.0/misc/nodelist.pl 2011-09-12 21:45:42.000000000 +0200
+++ 1//binkd-1.0/misc/nodelist.pl 2011-11-20 00:10:02.000000000 +0100
@@ -184,7 +184,7 @@ sub compile_nodelist
$zone = $region = $net = $node;
$node = 0;
$domzone = $domreg = $domnet = "";
- foreach $i qw(M 1 2 3 4) {
+ foreach $i (qw(M 1 2 3 4)) {
$domzone = $domreg = $domnet = "DO$i:" .
$flags{"UDO$i"} if $flags{"UDO$i"};
}
$ird = $flags{"IRD"};
@@ -192,7 +192,7 @@ sub compile_nodelist
$region = $net = $node;
$node = 0;
$domreg = $domnet = "";
- foreach $i qw(M 1 2 3 4) {
+ foreach $i (qw(M 1 2 3 4)) {
$domreg = $domnet = "DO$i:" . $flags{"UDO$i"}
if $flags{"UDO$i"};
}
$ird = $flags{"IRD"};
@@ -200,7 +200,7 @@ sub compile_nodelist
$net = $node;
$node = 0;
$domnet = "";
- foreach $i qw(M 1 2 3 4) {
+ foreach $i (qw(M 1 2 3 4)) {
$domnet = "DO$i:" . $flags{"UDO$i"} if
$flags{"UDO$i"};
}
$ird = $flags{"IRD"};
@@ -256,7 +256,7 @@ sub compile_nodelist
}
unless (@addr) {
$domflag = ($domnet || $domreg || $domzone);
- foreach $i qw(M 1 2 3 4) {
+ foreach $i (qw(M 1 2 3 4)) {
$domflag = "DO$i:" . $flags{"UDO$i"} if
$flags{"UDO$i"};
}
if ($domflag =~ /^DO(.):/) {
----- binkd-20111120.patch ends -----
not a single c code change :(
Regards Benny
... there can only be one way of life, and it works :)
would maintainers add this perl script to cpan ?
so it does not invalidate my ebuild md5 checksum, or can i get a md5 stable
file to make ebuilds to, updates is fine but i need to make new ebuild update
to sync md5 as it is now :(
----- binkd-20111120.patch begins -----
diff -urp 2//binkd-1.0/misc/nodelist.pl 1//binkd-1.0/misc/nodelist.pl
--- 2//binkd-1.0/misc/nodelist.pl 2011-09-12 21:45:42.000000000 +0200
+++ 1//binkd-1.0/misc/nodelist.pl 2011-11-20 00:10:02.000000000 +0100
@@ -184,7 +184,7 @@ sub compile_nodelist
$zone = $region = $net = $node;
$node = 0;
$domzone = $domreg = $domnet = "";
- foreach $i qw(M 1 2 3 4) {
+ foreach $i (qw(M 1 2 3 4)) {
$domzone = $domreg = $domnet = "DO$i:" .
$flags{"UDO$i"} if $flags{"UDO$i"};
}
$ird = $flags{"IRD"};
@@ -192,7 +192,7 @@ sub compile_nodelist
$region = $net = $node;
$node = 0;
$domreg = $domnet = "";
- foreach $i qw(M 1 2 3 4) {
+ foreach $i (qw(M 1 2 3 4)) {
$domreg = $domnet = "DO$i:" . $flags{"UDO$i"}
if $flags{"UDO$i"};
}
$ird = $flags{"IRD"};
@@ -200,7 +200,7 @@ sub compile_nodelist
$net = $node;
$node = 0;
$domnet = "";
- foreach $i qw(M 1 2 3 4) {
+ foreach $i (qw(M 1 2 3 4)) {
$domnet = "DO$i:" . $flags{"UDO$i"} if
$flags{"UDO$i"};
}
$ird = $flags{"IRD"};
@@ -256,7 +256,7 @@ sub compile_nodelist
}
unless (@addr) {
$domflag = ($domnet || $domreg || $domzone);
- foreach $i qw(M 1 2 3 4) {
+ foreach $i (qw(M 1 2 3 4)) {
$domflag = "DO$i:" . $flags{"UDO$i"} if
$flags{"UDO$i"};
}
if ($domflag =~ /^DO(.):/) {
----- binkd-20111120.patch ends -----
not a single c code change :(
Regards Benny
... there can only be one way of life, and it works :)