Add hashwide getters for AdSpace and Ad.pm

Fix a bug in Ad/set where if no properties were passed it would die.
This commit is contained in:
Colin Kuskie 2007-05-26 04:08:01 +00:00
parent d82e5a590a
commit 15d3ec323a
2 changed files with 11 additions and 3 deletions

View file

@ -158,7 +158,11 @@ The name of the property to retrieve the value for.
sub get {
my $self = shift;
my $name = shift;
return $self->{_properties}{$name};
if (defined $name) {
return $self->{_properties}{$name}
}
my %copyOfProperties = %{ $self->{_properties} };
return \%copyOfProperties;
}
#-------------------------------------------------------------------