From 2107ffa7eefae3148389ccea1163d2a46c0e49d2 Mon Sep 17 00:00:00 2001
From: Klaus Schmidinger <vdr@tvdr.de>
Date: Thu, 30 May 2002 09:50:19 +0200
Subject: Fixed parsing 'E' records

---
 epg2html.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'epg2html.pl')

diff --git a/epg2html.pl b/epg2html.pl
index 80383ed3..6b7b8c94 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.3 2002/02/26 17:20:19 kls Exp $
+# $Id: epg2html.pl 1.4 2002/05/30 09:46:46 kls Exp $
 
 @Index = ();
 
@@ -45,7 +45,7 @@ while (<>) {
          push(@Index, qq{<a href="$Page">$Channel</a><br>\n});
          my %Events = ();
          while (<>) {
-               if (/^E (.*?) (.*?) (.*?)/) {
+               if (/^E (.*?) (.*?) ([^ ]*)/) {
                   (my $Time, $Duration) = ($2, $3);
                   my $Title = "", $Subtitle = "", $Description = "";
                   while (<>) {
-- 
cgit v1.2.3