[livejournal] r22571: LJSUP-13199: Ability to use JSON RPC fro...

LJSUP-13199: Ability to use JSON RPC from l-stat

U   trunk/cgi-bin/LJ/JSON/RPC.pm

Modified: trunk/cgi-bin/LJ/JSON/RPC.pm
===================================================================
--- trunk/cgi-bin/LJ/JSON/RPC.pm	2012-08-03 14:28:31 UTC (rev 22570)
+++ trunk/cgi-bin/LJ/JSON/RPC.pm	2012-08-03 14:50:30 UTC (rev 22571)
@@ -72,7 +72,9 @@
     my ($self, $entry, $callback) = @_;
 
     my $call_info = { 
-        'source' => 'jsonrpc',
+        'source'   => 'jsonrpc',
+        'type'     => $self->{'callback'} ? 'jsonp' : 'CORS',
+        'hostname' => LJ::Request->hostname,
     };
 
     my $item   = $entry->{'item'};