diff options
| author | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2009-08-16 15:44:07 +0200 |
|---|---|---|
| committer | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2009-08-16 15:44:07 +0200 |
| commit | 2ea741ee97e8412f85887932f8c03763c9834230 (patch) | |
| tree | 005e6c8d8802a8bb2caf7ae37fe3b0f761b99fa4 /lib/LXRng/Context.pm | |
| parent | 12b22ab633c19798d444e08b8be2b44d51d6acfd (diff) | |
| parent | 18bbb85315b190ccf5698fab3a39b576e7a2dbcd (diff) | |
Merge branch 'master' of /home/argggh/git/lxrng/
Diffstat (limited to 'lib/LXRng/Context.pm')
| -rw-r--r-- | lib/LXRng/Context.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/LXRng/Context.pm b/lib/LXRng/Context.pm index bf717ab..fe1a0fe 100644 --- a/lib/LXRng/Context.pm +++ b/lib/LXRng/Context.pm @@ -54,6 +54,11 @@ sub new { $$self{'prefs'} = { map { /^(.*?)(?:=(.*)|)$/; ($1 => $2) } @prefs }; } + else { + if ($args{'query'}->user_agent() =~ /(Gecko|Opera)\//) { + $$self{'prefs'}{'navmethod'} = 'ajax'; + } + } foreach my $tree (keys %$config) { my $base = $$config{$tree}{'base_url'}; $base =~ s,^https?://[^/]+,,; |