Codebase list libhttp-browserdetect-perl / 745a2d2
Tidy Andrew Moise 9 years ago
1 changed file(s) with 2 addition(s) and 2 deletion(s). Raw diff Collapse all Expand all
+2
-2
lib/HTTP/BrowserDetect.pm less more
957957 $self->{robot_fragment} = "search";
958958 $robot_tests->{robot} = 'unknown';
959959 }
960 elsif ( $self->{user_agent} =~ /([\w \/\.\-]+)[ \;\(\)]*\+http\:/i )
961 {
960 elsif ( $self->{user_agent} =~ /([\w \/\.\-]+)[ \;\(\)]*\+http\:/i ) {
961
962962 # Something followed by +http
963963 $self->{robot_string} = $1;
964964 $self->{robot_string} =~ s/^ *(.+?)[ \;\(\)]*$/$1/;