<%attr> ajax => 1
<& 'SELF:display_form', %ARGS &>

<& 'SELF:display_detail', EpgStatus => '1', %ARGS &>
<%method display_form> <%args> $size => undef $chnum => '1' $bouqet => $r->notes('CFG_StartBouqet') $ip_address => $r->notes('CFG_ip_address') <%perl> my $streamlink='/vdr/epg/now.html:display_detail&chnum=%chnum'; <& '/include/epg:read_epg' &>
<& '/vdr/channel.html:display_form' , target => '_self' , div => 'now' , nosearch => 'true' , bouqet => $bouqet , update => 'now' , comp => '/vdr/epg/now.html:display_detail' , link => $streamlink , ip_address => $ip_address , %ARGS &>
<%method display_detail> <%attr> ajax => 1 update => 'now' throbber => 1 form => 'bouqet_form' <%args> $bouqet => $r->notes('CFG_StartBouqet') $ip_address => $r->notes('CFG_ip_address') $start_time => timelocal( localtime() ) $EpgStatus => undef $chnum => undef <%perl> my $streamlink = 'http://' . $ip_address . ':3000/PES/'; if ( !defined $EpgStatus ) { $m->comp('/include/epg:read_epg'); } my $uesc_bouqet = uri_unescape($bouqet);
<&| '/include/channel:get_chnum_from_bouqet', bouqet => uri_unescape($bouqet), chnum => \$chnum &> <&| '/include/epg:get_epg', chnum => $chnum , start_time => $start_time, actual => 'true' &>
<&| '/include/date:get_time', time => $start_time &> @(%week_day) %day.%mon.%year - %hour:%min
@(Was laeuft um)?
<% $chnum %> <% $m->comp('/include/channel:get_channel_name', cCount => $chnum) %>
%text ( -%remaining min )
%image_tag

%titel

%subtitel


%start_time - %end_time %length min


%descr

<%filter> s/\|\*\*\*\|/

/g; s/\.\|/\.

/g; s/\|/
/g;