From 90af5a1bd94255222debf6c05ee159e2ca044680 Mon Sep 17 00:00:00 2001 From: Klaus Schmidinger Date: Tue, 26 Feb 2002 17:20:19 +0100 Subject: Fixed parsing 'E' records --- epg2html.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/epg2html.pl b/epg2html.pl index 215eb735..80383ed3 100755 --- a/epg2html.pl +++ b/epg2html.pl @@ -12,7 +12,7 @@ # See the main source file 'vdr.c' for copyright information and # how to reach the author. # -# $Id: epg2html.pl 1.2 2000/12/01 18:37:46 kls Exp $ +# $Id: epg2html.pl 1.3 2002/02/26 17:20:19 kls Exp $ @Index = (); @@ -45,7 +45,7 @@ while (<>) { push(@Index, qq{$Channel
\n}); my %Events = (); while (<>) { - if (/^E (.*) (.*) (.*)/) { + if (/^E (.*?) (.*?) (.*?)/) { (my $Time, $Duration) = ($2, $3); my $Title = "", $Subtitle = "", $Description = ""; while (<>) { -- cgit v1.2.3