Subject: | ssl and dom parameters ignored |
Specifying either the 'dom' or 'ssl' parameter sets their respective value to true, regardless of their actual value. Patch attached.
diff -BurN Net-EPP-Client-0.02/lib/Net/EPP/Client.pm Net-EPP-Client-0.02b/lib/Net/EPP/Client.pm
--- Net-EPP-Client-0.02/lib/Net/EPP/Client.pm 2005-11-06 16:28:16.000000000 +0000
+++ Net-EPP-Client-0.02b/lib/Net/EPP/Client.pm 2005-11-06 16:28:49.000000000 +0000
@@ -116,8 +116,8 @@
my $self = {
'host' => $params{'host'},
'port' => $params{'port'},
- 'ssl' => (defined($params{'ssl'}) ? 1 : 0),
- 'dom' => (defined($params{'dom'}) ? 1 : 0),
+ 'ssl' => (defined($params{'ssl'}) ? $params{'ssl'} : 0),
+ 'dom' => (defined($params{'dom'}) ? $params{'dom'} : 0),
};
if ($self->{'dom'} == 1) {