summaryrefslogtreecommitdiff
path: root/summary2info.pl
diff options
context:
space:
mode:
authorKlaus Schmidinger <vdr@tvdr.de>2005-06-04 11:33:09 +0200
committerKlaus Schmidinger <vdr@tvdr.de>2005-06-04 11:33:09 +0200
commiteecf0b661666c2b1e07a4b64333b958adc3ce34d (patch)
tree8f44a38273615ac8773c36c1e3452df01f648a25 /summary2info.pl
parent7bffdb9e82c6ee607f9b7346220828c79323a37a (diff)
downloadvdr-eecf0b661666c2b1e07a4b64333b958adc3ce34d.tar.gz
vdr-eecf0b661666c2b1e07a4b64333b958adc3ce34d.tar.bz2
Fixed handling 'summary.vdr' files with more than two empty lines
Diffstat (limited to 'summary2info.pl')
-rwxr-xr-xsummary2info.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/summary2info.pl b/summary2info.pl
index 8e80abe0..f757ac36 100755
--- a/summary2info.pl
+++ b/summary2info.pl
@@ -10,7 +10,7 @@
# See the main source file 'vdr.c' for copyright information and
# how to reach the author.
#
-# $Id: summary2info.pl 1.2 2005/05/22 10:37:47 kls Exp $
+# $Id: summary2info.pl 1.3 2005/06/04 11:33:09 kls Exp $
$VideoDir = $ARGV[0] || die "please provide the name of the video directory\n";
@@ -24,7 +24,7 @@ for $SummaryFile (@SummaryFiles) {
@data = ();
while (<F>) {
chomp;
- if ($_) {
+ if ($_ || $line > 1) {
$data[$line] .= '|' if ($data[$line]);
$data[$line] .= $_;
}