use normal agent string

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@783 c11ca15a-4712-0410-83d8-924469b57eb5

diff --git a/src/Modules/Exchange.pl b/src/Modules/Exchange.pl
index ae421479e1c0bc477a67758129947af89927acbf..d20cea07aff641b0693c275ec6aaeb759ffeec7a 100644 (file)
--- a/src/Modules/Exchange.pl
+++ b/src/Modules/Exchange.pl
@@ -293,7 +293,8 @@ sub exchange {
     }
 
     my $ua = new LWP::UserAgent;
-    $ua->agent("Mozilla/4.5 " . $ua->agent);        # Let's pretend
+    #$ua->agent("Mozilla/5.0 " . $ua->agent);        # Let's pretend
+    $ua->agent("Mozilla/5.0");        # Let's pretend
     $ua->proxy('http', $::param{'httpProxy'}) if (&::IsParam("httpProxy"));
     $ua->timeout(10);