|
Lines 1-4
Link Here
|
| 1 |
--- policyd-weight.orig 2011-09-03 13:55:02 UTC |
1 |
--- policyd-weight.orig 2015-07-23 19:34:04 UTC |
| 2 |
+++ policyd-weight |
2 |
+++ policyd-weight |
| 3 |
@@ -320,7 +320,7 @@ $SIG{__DIE__} = sub { |
3 |
@@ -320,7 +320,7 @@ $SIG{__DIE__} = sub { |
| 4 |
|
4 |
|
|
Lines 139-145
Link Here
|
| 139 |
unpack('n n n n n n a*', $buf); |
139 |
unpack('n n n n n n a*', $buf); |
| 140 |
|
140 |
|
| 141 |
- my ($dn, $offset) = dn_expand(\$qb, 0); |
141 |
- my ($dn, $offset) = dn_expand(\$qb, 0); |
| 142 |
+ my ($dn, $offset) = Net::DNS::Packet::dn_expand(\$qb, 0); |
142 |
+ my ($dn, $offset) = decode Net::DNS::DomainName(\$qb, 0); |
| 143 |
|
143 |
|
| 144 |
if(($id && $anc) && ($id == $oid) && ($query eq $dn)) |
144 |
if(($id && $anc) && ($id == $oid) && ($query eq $dn)) |
| 145 |
{ |
145 |
{ |