Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- $app->helper(
- is_mobile => sub {
- my $self = shift;
- $self->app->log->debug( $self );
- $self->app->log->debug( $self->tx );
- $self->app->log->debug( $self->tx->req );
- return $self->tx->req->headers->user_agent
- =~ /(iPhone|iPod|iPad|Android|BlackBerry|Mobile|Palm)/ ? 1 : 0;
- }
- );
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement