mirror of
https://github.com/vdr-projects/vdr.git
synced 2025-03-01 10:50:46 +00:00
f1d1c9849c
- Modified the display of the channel group separators (thanks to Markus Lang for this suggestion). - Added support for replaying DVDs (thanks to Andreas Schultz). See INSTALL for instructions on how to compile VDR with DVD support. - Fixed replay progress display in case replay is paused while watching an ongoing recording. - Ringbuffer uses semaphores to signal empty/full conditions. - Fixed calculating the timeout value in cFile::FileReady() (thanks to Wolfgang Henselmann-Weiss).
32 lines
429 B
Perl
Executable File
32 lines
429 B
Perl
Executable File
#!/usr/bin/perl
|
|
|
|
open (FI,"cut") or die "Kann Cut-Datei nicht oeffnen\n";
|
|
|
|
outer: while (<FI>)
|
|
{
|
|
chomp;
|
|
if (! ($_ > 1 || $_ eq "0"))
|
|
{
|
|
open (FO,">cut2");
|
|
print FO "$_\n";
|
|
while (<FI>)
|
|
{
|
|
chomp;
|
|
if ($_ > 1 || $_ eq "0")
|
|
{
|
|
print FO "$_\n";
|
|
}
|
|
else
|
|
{
|
|
system ("cutt");
|
|
redo outer;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
if ( -f "cut2")
|
|
{
|
|
system ("cutt");
|
|
unlink "cut2";
|
|
}
|