browser: rename usage metadata keys
[sheet.git] / tools / convert-stats-gs.pl
index c28fde8d0a8bdc5028f0012c86332b1ec7bbb482..751465907f30a0ea478a445c9d10f219ef4bef05 100644 (file)
@@ -20,7 +20,7 @@ my %BROWSERID = qw(
 );
 
 my %count = (
 );
 
 my %count = (
-       -source => 'StatCounter',
+       -title  => 'StatCounter',
        -site   => 'http://gs.statcounter.com/',
 );
 
        -site   => 'http://gs.statcounter.com/',
 );
 
@@ -36,7 +36,7 @@ if (@ARGV) {
        my $site = $count{-site};
        $site .= 'chart.php?'.join('&', map "$_=$param{$_}", keys %param);
        $site .= '&statType_hidden=';
        my $site = $count{-site};
        $site .= 'chart.php?'.join('&', map "$_=$param{$_}", keys %param);
        $site .= '&statType_hidden=';
-       $count{-url} = $site;
+       $count{-source} = $site;
 
        require LWP::Simple;
        {
 
        require LWP::Simple;
        {