]> www.wagner.pp.ru Git - oss/vjournal.git/blobdiff - bin/userinfo
userinfo works in unlogged mode
[oss/vjournal.git] / bin / userinfo
index 92a45e5fd45b1f0d76e267e622a0d9b80ecc45a7..653d099f6ab0253679f60b9c90df2233b22d92d5 100644 (file)
@@ -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);