X-Git-Url: http://www.wagner.pp.ru/gitweb/?p=oss%2Fvjournal.git;a=blobdiff_plain;f=bin%2Fuserinfo;fp=bin%2Fuserinfo;h=653d099f6ab0253679f60b9c90df2233b22d92d5;hp=92a45e5fd45b1f0d76e267e622a0d9b80ecc45a7;hb=200e065d42299c1d605d503fb9c30fe3728bf0da;hpb=c18ba47bd2daa9239244e087a9967f24ceffc200 diff --git a/bin/userinfo b/bin/userinfo index 92a45e5..653d099 100644 --- a/bin/userinfo +++ b/bin/userinfo @@ -34,17 +34,18 @@ If user is not logged in, returns following structure: =cut use VJournal::Session; +use VJournal::ProviderList; use JSON; use CGI; my $cgi=new CGI; -my $session = VJourna::Session->new($cgi); +my $session = VJournal::Session->new($cgi); my $out={}; if (!defined $session) { # User is not authenticated. Return list of providers; $out->{state}="notlogged"; $sites=VJournal::ProviderList->new; - $out->{providers}=$sites->menu; + $out->{providers}=[ $sites->menu ] ; $session=$cgi; } else { if ($session->isowner()) { @@ -65,5 +66,5 @@ if (!defined $session) { } $session->header(-content_type=>"text/json",-charset=>utf-8); -print $encode_json($out); +print encode_json($out);