diff options
| -rwxr-xr-x | perl-install/standalone/drakdvb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/standalone/drakdvb b/perl-install/standalone/drakdvb index cb003cf63..802a4feb2 100755 --- a/perl-install/standalone/drakdvb +++ b/perl-install/standalone/drakdvb @@ -96,6 +96,7 @@ sub detect_channels() { sub load_channels() { @{$channel_list->{data}} = (); open(my $CHANNELCONF, "<$config_file"); + local $_; while (<$CHANNELCONF>) { my $line = $_; if ($line =~ /^([^:]*?)(\([^(:]*\))?:/) { |