bye bye github

lib/Dojo/Controller/Users.pm

@@ -0,0 +1,28 @@
+package Dojo::Controller::Users;
+use Mojo::Base 'Mojolicious::Controller';
+use Dojo::Support qw{ merge_hash load_module };
+
+
+sub login {
+  my $c = shift;
+  $c->stash((load_module($c))[0]);
+  my $user = $c->param('uname') // '';
+  my $pass = $c->param('pass') //'';
+  return $c->render unless my $pmid = $c->dbg->check($user, $pass);
+  $c->session(user => $user, pmid=>$pmid, nick=> $c->param('nick'));
+  $c->redirect_to('radio');
+}
+
+sub is_logged {
+  my $self = shift;
+  return 1 if $self->session('user');
+  $self->redirect_to('login');
+}
+
+sub logout {
+  my $self = shift;
+  $self->session(expires => 1);
+  $self->redirect_to('home');
+}
+
+1;