use HTTP::BrowserDetect for browser detection

This commit is contained in:
Graham Knop 2010-09-11 03:09:27 -05:00
parent 5e75631f6b
commit 6fa07671cd
7 changed files with 31 additions and 58 deletions

View file

@ -130,11 +130,9 @@ sub useMobileStyle {
if (! $session->setting->get('useMobileStyle')) {
return $self->{_useMobileStyle} = 0;
}
my $ua = $session->request->user_agent;
for my $mobileUA (@{ $self->session->config->get('mobileUserAgents') }) {
if ($ua =~ m/$mobileUA/) {
return $self->{_useMobileStyle} = 1;
}
if ($session->request->browser->mobile) {
return $self->{_useMobileStyle} = 1;
}
return $self->{_useMobileStyle} = 0;
}