# -*- mode: perl; coding: utf-8 -*-
# keitairc/lib/plugins/00logout
# ログアウト(セッション破棄)

# The line number (1 incremented) and filename below must be
# actual. see perlsyn.
# line 10 "keitairc/lib/plugins/00logout"

$plugin = {
	name => 'logout',
	action_imprementation => sub {
		my ($request, $name, $session_id, $param) = @_;
		my $ci = new Keitairc::ClientInfo($request);
		my $view = new Keitairc::View($::cf, $ci);
		$::sm->delete($session_id);
		return $view->render('logout.html');
	}
};

1;
