Skip to content

Commit

Permalink
fixed typos
Browse files Browse the repository at this point in the history
  • Loading branch information
notnac committed Jan 11, 2024
1 parent bf49da3 commit 251078b
Showing 1 changed file with 5 additions and 5 deletions.
10 changes: 5 additions & 5 deletions get_iplayer
Original file line number Diff line number Diff line change
Expand Up @@ -52,7 +52,7 @@ use IO::Socket;
use IPC::Open3;
use LWP::ConnCache;
use LWP::UserAgent;
use open IN => ':crlf:utf8', OUT => ':utf8';
use open IN => ':crlf :utf8', OUT => ':utf8';
use PerlIO::encoding;
use POSIX qw(strftime);
use POSIX qw(:termios_h);
Expand Down Expand Up @@ -818,12 +818,12 @@ sub release_check {
} else {
main::logger "INFO: You have the latest release ($version_text)\n";
}
if (! open (relchk, "> $relchk_file") ) {
if (! open (RELCHK, "> $relchk_file") ) {
main::logger "ERROR: Cannot write to release check file: $relchk_file\n";
return 1;
}
print relchk "$relchk_msg\n";
close relchk;
print RELCHK "$relchk_msg\n";
close RELCHK;
}
}

Expand Down Expand Up @@ -7312,7 +7312,7 @@ sub get_links_schedule_lwp {
my $limit = shift;
my $now = shift || time();
my $rc_lwp;
main::logger "\INFO: Downloading $channel schedule page: $url\n" if $opt->{verbose};
main::logger "\nINFO: Downloading $channel schedule page: $url\n" if $opt->{verbose};
my $html = main::request_url_retry($ua, $url, 3, '.', "Failed to download $channel schedule page");
return 1 unless $html;
my $rc = $self->get_links_schedule_json($html, $prog, $prog_type, $channel_id, $channel, $future, $limit, $now, $url);
Expand Down

0 comments on commit 251078b

Please sign in to comment.