Return early if we can't do anything here to avoid warnings.
Patch by kareila.
diffs (28 lines):
diff -r 95a601bcc9a4 -r bd5de7e0ffd5 cgi-bin/LJ/TextMessage.pm
--- a/cgi-bin/LJ/TextMessage.pm Tue Dec 28 22:29:34 2010 +0800
+++ b/cgi-bin/LJ/TextMessage.pm Tue Dec 28 22:32:37 2010 +0800
@@ -905,7 +905,9 @@ sub provider_info
}
sub remap {
- my $provider = shift;
+ my ( $provider ) = @_;
+ return unless defined $provider;
+
return "o2mmail" if $provider eq "btcellnet";
return "voicestream" if $provider eq "voicestream2";
return "tmobileusa" if $provider eq "tmomail";
diff -r 95a601bcc9a4 -r bd5de7e0ffd5 cgi-bin/LJ/Widget/Location.pm
--- a/cgi-bin/LJ/Widget/Location.pm Tue Dec 28 22:29:34 2010 +0800
+++ b/cgi-bin/LJ/Widget/Location.pm Tue Dec 28 22:32:37 2010 +0800
@@ -248,8 +248,8 @@ sub handle_post {
}
sub country_regions_cfg {
- my $class = shift;
- my $country = shift;
+ my ( $class, $country ) = @_;
+ return unless defined $country;
return $LJ::COUNTRIES_WITH_REGIONS{$country};
}
_______________________________________________
dw-changelog mailing list
[email protected]
http://lists.dwscoalition.org/mailman/listinfo/dw-changelog
