zero merge

lib/Dojo.pm

@@ -56,13 +56,15 @@ sub startup {
   $logged_in->get('/radio')->to('home#radio');
   # ===================
 
-  # login user grulla =
+  # login any temp pass=
+  my $usert = $r->under('/')->to('users#is_tmp');
   # common  grulla user
   my $user = $r->under('/')->to('users#is_grulla');
   $user->any('/ccast')->to('home#bcast');
   # personal 
   my $guest = $r->under('/')->to('users#is_grulla_tmp');
   $guest->any('/bcast')->to('home#bcast');
+  $guest->any('/radiop')->to('home#radiop');
   # ===================
 
   # admin =======================================================================

lib/Dojo/Controller/Home.pm

@@ -115,6 +115,13 @@ sub radio{
   $c->stash($c->dbv->mod);
   $c->stash(nick=>$c->session("nick"));
 }
+
+sub radiop{
+  my $c=shift;
+  $c->stash(layout=> "defaultContact");
+  $c->stash($c->dbv->mod);
+  $c->stash(nick=>$c->session("nick"));
+}
   
 sub candy{
   my $c=shift;

lib/Dojo/Controller/Users.pm

@@ -64,6 +64,7 @@ sub is_admin {
   $self->redirect_to('login');
 }
 
+
 sub is_grulla {
   my $self = shift;
     return 1 if (($self->session('pmid')//0)>=2);