Initial revision
[OpenSRF.git] / src / perlmods / OpenSRF / DOM / Element / searchTargetValue.pm
1 package OpenSRF::DOM::Element::searchTargetValue;
2 use base 'OpenSRF::DOM::Element';
3
4 sub new {
5         my $self = shift;
6         my $class = ref($self) || $self;
7         my @args = @_;
8
9         my @values = ();
10         for my $val (@args) {
11                 next unless ($val);
12                 if (ref($val)) {
13                         push @values, $class->new(@$val);
14                 } else {
15                         push @values, $class->SUPER::new( value => $val );
16                 }
17                 
18         }
19         return $values[0] if (!wantarray);
20         return @values;
21 }
22
23 1;