package SrvMngr::Controller::Modules;

use strict;
use warnings;
use Mojo::Base 'Mojolicious::Controller';

use Locale::gettext;
use SrvMngr::I18N;

#
# routes : end
#----------------------------------------------------------------------
use SrvMngr qw(theme_list init_session);


sub bugreport {
    my $c = shift;

    $c->app->log->info($c->log_req);

    my $modul = $c->render_to_string( inline => "<p>#    my (\$lang, \$releaseVersion,
<br>#	\$c->stash\(\'lang\', \'releaseVer\'
#	\'navigation\'</p>");

    $c->stash( modul => $modul );

};


sub support {
    my $c = shift;

    $c->app->log->info($c->log_req);
    my $modul = $c->stash('modul');
    $modul .= 'Mail result is 1 + 8.';

    $c->stash( modul => $modul, PwdSet => '0', Unsafe => '0' );

    #$c->render('modules/support');
};


sub modsearch {
    my $c = shift;
    my $module = $c->param('module');

    $c->app->log->info($c->log_req);

    my $redirect_url = SrvMngr->get_mod_url($module);
    if($redirect_url ne "-1"){
	#$c->render(text => "mod_search: $module to $redirect_url");
        return $c->redirect_to($redirect_url);
        #return $c->redirect_to( url_for($redirect_url) );
    }
    #$c->render(text => "mod_search: $module to 'welcome'");
    return $c->redirect_to( $c->home_page );

};


sub whatever {
    my $c = shift;
    my $whatever = $c->param('whatever');

    $c->app->log->info($c->log_req . ' ' . $whatever);

    $c->render(text => "whatever: /$whatever did not match.", status => 404);
};


1;