https://www.mediawiki.org/wiki/Special:Code/MediaWiki/114629
Revision: 114629
Author: a_engels
Date: 2012-03-30 08:53:45 +0000 (Fri, 30 Mar 2012)
Log Message:
-----------
adding Wiktionary app
Modified Paths:
--------------
trunk/wikistats/squids/SquidCountArchive.pl
trunk/wikistats/squids/SquidCountArchiveProcessLogRecord.pm
Modified: trunk/wikistats/squids/SquidCountArchive.pl
===================================================================
--- trunk/wikistats/squids/SquidCountArchive.pl 2012-03-30 06:43:32 UTC (rev
114628)
+++ trunk/wikistats/squids/SquidCountArchive.pl 2012-03-30 08:53:45 UTC (rev
114629)
@@ -55,7 +55,7 @@
$time_start = time ;
$path_root = $job_runs_on_production_server ? $cfg_path_root_production :
$cfg_path_root_test ;
- $tags_wiki_mobile = "CFNetwork|Dalvik|WikipediaMobile|Appcelerator" ;
+ $tags_wiki_mobile =
"CFNetwork|Dalvik|WikipediaMobile|Appcelerator|WiktionaryMobile" ;
$tags_mobile = "Android|BlackBerry|Windows
CE|DoCoMo|iPad|iPod|iPhone|HipTop|Kindle|LGE|Linux
arm|Mobile|MIDP|NetFront|Nintendo|Nokia|Obigo|Opera Mini|Opera
Mobi|Palm|Playstation|Samsung|SoftBank|SonyEricsson|SymbianOS|UP\.Browser|Vodafone|WAP|webOS|HTC
|HTC_|KDDI|FOMA|Polaris|Teleca|Silk|ZuneWP|HUAwei|Blazer|Sunrise|AUDIOVOX|LG/U|AU-MIC|Motorola|portalmmm|Amoi|GINGERBREAD|Spice|SonyDTV|lgtelecom|PlayBook|KYOCERA|Opera
Tablet|Windows Phone|UNTRUSTED" ;
$tags_mobile_upd = "March 2012" ;
Modified: trunk/wikistats/squids/SquidCountArchiveProcessLogRecord.pm
===================================================================
--- trunk/wikistats/squids/SquidCountArchiveProcessLogRecord.pm 2012-03-30
06:43:32 UTC (rev 114628)
+++ trunk/wikistats/squids/SquidCountArchiveProcessLogRecord.pm 2012-03-30
08:53:45 UTC (rev 114629)
@@ -485,8 +485,8 @@
{ ($version = $agent2) =~ s/^.*?(Dalvik\/\d+\.?\d*).*$/Android: $1/o ; }
# WIKIPEDIA MOBILE
- elsif ($agent2 =~ /WikipediaMobile(\/| )\d+/io)
- { ($version = $agent2) =~ s/^.*(WikipediaMobile(\/| )(\d|\.)+).*$/Android:
$1 (WMF)/o ; }
+ elsif ($agent2 =~ /(Wiktionary|Wikipedia)Mobile(\/| )\d+/io)
+ { ($version = $agent2) =~ s/^.*((Wiktionary|Wikipedia)Mobile(\/|
)(\d|\.)+).*$/Android: $1 (WMF)/o ; }
# ANDROID
elsif ($agent2 =~ /Android\/\d+/io)
@@ -680,7 +680,7 @@
{ $browsertype = '-' ; }
elsif ($bot)
{ $browsertype = 'B' ; }
- elsif ($agent2 =~ /WikipediaMobile/io)
+ elsif ($agent2 =~ /(Wikipedia|Wiktionary)Mobile/io)
{ $browsertype = 'A' ; }
elsif ($agent2 =~ /Dalvik/io)
{ $browsertype = 'a' ; }
_______________________________________________
MediaWiki-CVS mailing list
MediaWiki-CVS@lists.wikimedia.org
https://lists.wikimedia.org/mailman/listinfo/mediawiki-cvs
