Committer: mchernyshev
LJSUP-5987: Redirection to mobile version- username can contain '-'.
U trunk/cgi-bin/Apache/WURFL.pm
Modified: trunk/cgi-bin/Apache/WURFL.pm =================================================================== --- trunk/cgi-bin/Apache/WURFL.pm 2010-08-20 03:11:55 UTC (rev 17163) +++ trunk/cgi-bin/Apache/WURFL.pm 2010-08-20 03:25:32 UTC (rev 17164) @@ -77,7 +77,7 @@ my $host = $opts{'host'}; my $args = $opts{'args'}; - if ($host =~ /^(\w+)\.\Q$LJ::DOMAIN\Q/) { + if ($host =~ /^([\w|-]+)\.\Q$LJ::DOMAIN\Q/) { my $username = $1; if ($username eq 'www') { # main lj pages