package
App::Mobirc::HTTPD::Template::Parts;
use
strict;
use
warnings;
template
'keyword_line'
=>
sub
{
my
(
$self
,
$row
,
$irc_nick
) =
@_
;
show
'irc_message'
,
$row
,
$irc_nick
;
outs
'('
;
a { attr {
'href'
=>
sprintf
(
'/channels/%s'
, uri_escape(
$row
->channel->name)) }
$row
->channel->name
};
outs
')'
;
br { };
};
template
'parts/version_info'
=>
sub
{
div {
class is
'VersionInfo'
;
span {
'mobirc - '
};
span {
class is
'version'
;
$App::Mobirc::VERSION
;
}
}
};
1;