X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=lib%2FZOOM%2FIRSpy%2FTest%2FPing.pm;h=ec6c441949f20e6e0cb98dbc695197aabda65eef;hp=a6d8d5508130acca3ac6b13454c18b5ac24b31a3;hb=f5674617443eec5534a1f1770b6e9658045f8eb9;hpb=eaaaac5b8dd70797ba546d22c01491ee606c9bfb diff --git a/lib/ZOOM/IRSpy/Test/Ping.pm b/lib/ZOOM/IRSpy/Test/Ping.pm index a6d8d55..ec6c441 100644 --- a/lib/ZOOM/IRSpy/Test/Ping.pm +++ b/lib/ZOOM/IRSpy/Test/Ping.pm @@ -24,8 +24,10 @@ sub start { my $xc = $conn->record()->xpath_context(); my $user = $xc->find("e:serverInfo/e:authentication/e:user"); my $password = $xc->find("e:serverInfo/e:authentication/e:password"); + my $proxy = $xc->find("e:serverInfo/e:authentication/e:proxy"); $options{"*user"} = $user if $user; $options{"*password"} = $password if $password; + $options{"*proxy"} = $proxy if $proxy; $conn->irspy_connect(undef, \%options, ZOOM::Event::ZEND, \&connected,