<%attr> ajax => 1 <%args> $size => undef $bouqet => $m->comp('/include/config:get_key', key => 'StartBouqet') $chnum => '1' $factor => $m->comp('/include/config:get_key', key => 'timeline-factor') $AvantgardeIP => $m->comp('/include/config:get_key', key => 'AvantgardeIP') <%perl> my $streamlink = '/vdr/epg/now.html:display_detail&chnum=%chnum'; <& '/include/epg:read_epg' &>
<& '/vdr/channel.html:display_form' , target => '_self' , div => 'timeline' , nosearch => 'true' , bouqet => $bouqet , update => 'timeline' , AvantgardeIP => $AvantgardeIP , comp => '/vdr/epg/timeline.html:display_detail' , link => $streamlink , %ARGS &>
<& 'SELF:display_detail', EpgStatus => '1', AvantgardeIP => $AvantgardeIP, %ARGS &>
<%method display_detail> <%attr> ajax => 1 update => 'timeline' throbber => 1 form => 'bouqet_form' <%args> $bouqet => $m->comp('/include/config:get_key', key => 'StartBouqet') $AvantgardeIP => $m->comp('/include/config:get_key', key => 'AvantgardeIP') $EpgStatus => undef $timeframe => '240' $start_time => timelocal(localtime()) $factor => $m->comp('/include/config:get_key', key => 'timeline-factor') $nfactor => $factor $chnum => undef <%init> use Time::Local; $bouqet = uri_unescape($bouqet);

<% uri_unescape($bouqet) %>  

2h   4h   8h
@(Was Laeuft um)?
<&| '/include/channel:get_chnum_from_bouqet', bouqet => uri_unescape($bouqet), chnum => \$chnum &>
@(Kanal)  
% if ( $start_time > timelocal(localtime) ) { % }
<% $chnum %> <% $m->comp('/include/channel:get_channel_name', cCount => $chnum) %>
<&| '/include/epg:get_epg', chnum => $chnum, timeframe => $timeframe, factor => $nfactor, start_time => $start_time &>

%titel

%subtitel


%start_time - %end_time %length min


%descr


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

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

/g; s/\|/
/g; <%method app_links> <%attr> ajax => 1 <%args> $chnum $start_time $bouqet <&| '/include/epg:get_epg', chnum => $chnum , timeindex => $start_time &>
<% $chnum %> <% $m->comp('/include/channel:get_channel_name', cCount => $chnum) %>

%titel
%subtitel
%descr
@(Neuer Timer)
@(EPG)
@(In der Internet Film Datenbank IMDB suchen)
@(Suche nach Wiederholungen)
<%filter> s/\|\*\*\*\|/

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

/g; s/\|/
/g;