summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
7a089d5)
Return undef for unaliased headers right away, instead of trying to find
$header{+undef}. Result is the same (the '' header never exists at this
point), but without the warning.
$self->[2] = 0;
}
$key =~ tr/_/-/;
$self->[2] = 0;
}
$key =~ tr/_/-/;
- return $self->[0]->{ $self->[1]->{lc $key} };
+ defined ($key = $self->[1]->{lc $key}) or return;
+ return $self->[0]->{$key};