Koha/C4/SIP/Sip/Configuration/Service.pm
Ryan Higgins 7b9b36bd2e adding openncip / opensip SIP2 service
Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
2007-11-06 06:32:53 -06:00

25 lines
302 B
Perl

#
#
#
#
package Sip::Configuration::Service;
use strict;
use warnings;
use English;
use Exporter;
sub new {
my ($class, $obj) = @_;
my $type = ref($class) || $class;
if (ref($obj) eq "HASH") {
# Just bless the object
return bless $obj, $type;
}
return bless {}, $type;
}
1;