use warnings;
use XML::Simple qw(:strict);
+use C4::SIP::Sip qw(syslog);
+
my $parser = new XML::Simple(
KeyAttr => {
login => '+id',
my $portstr;
foreach my $addr ( '', '*:', "$sockaddr:", "[$sockaddr]:" ) {
$portstr = sprintf( "%s%s/%s", $addr, $port, lc $proto );
- Sys::Syslog::syslog( "LOG_DEBUG",
+ syslog( "LOG_DEBUG",
"Configuration::find_service: Trying $portstr" );
last if ( exists( ( $self->{listeners} )->{$portstr} ) );
}