| Subject: | Use $self->get_header() instead of $ENV{} |
Please apply the following patch to HTTP::MobileAgent 0.23_01.
--- HTTP/MobileAgent/Vodafone.pm.dist 2005-03-10 03:24:44.000000000 +0900
+++ HTTP/MobileAgent/Vodafone.pm 2005-05-12 21:03:51.000000000 +0900
@@ -93,7 +93,7 @@
}
#model from x-jphone-msname
- $self->{model} = $ENV{'HTTP_X_JPHONE_MSNAME'};
+ $self->{model} = $self->get_header('x-jphone-msname');
my($java_info) = $self->user_agent =~ /(Profile.*)$/;
my %java_info = map split(m!/!), split / /,$java_info;
@@ -118,8 +118,7 @@
$self->{java_info} = \%java_info;
#model from x-jphone-msname
- $self->{model} = $ENV{'HTTP_X_JPHONE_MSNAME'};
-
+ $self->{model} = $self->get_header('x-jphone-msname');
}
sub _make_display {
-- SATOH Fumiyasu