first round of Perl::Critic cleanups. Do not use return undef, use a bare return instead

This commit is contained in:
Colin Kuskie 2007-12-05 00:30:43 +00:00
parent 75041656ee
commit 96178fd70c
92 changed files with 209 additions and 209 deletions

View file

@ -156,7 +156,7 @@ sub new {
my $session = shift;
my $id = shift;
my $properties = $session->db->getRow("advertisement","adId",$id);
return undef unless $properties->{adId};
return unless $properties->{adId};
bless {_session=>$session, _properties=>$properties}, $class;
}