diff options
| author | ailin-nemui | 2017-03-20 21:24:59 +0100 |
|---|---|---|
| committer | GitHub | 2017-03-20 21:24:59 +0100 |
| commit | 1f3171fbee0f88d24429ea3ed6b0248e021f73a5 (patch) | |
| tree | 0f27f2abf012a6eff817afec824b9dcc1805aea4 /scripts | |
| parent | 0005eeef4c70655b3ecd9bfb157e0409b20ea1a2 (diff) | |
| parent | 3ea2d4a32213efd949d0a1eef1f0c43271e6593e (diff) | |
| download | scripts.irssi.org-1f3171fbee0f88d24429ea3ed6b0248e021f73a5.tar.bz2 | |
Merge pull request #379 from bw1/nicklist
[nicklist][crit] rewrite open
Diffstat (limited to 'scripts')
| -rwxr-xr-x | scripts/nicklist.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/scripts/nicklist.pl b/scripts/nicklist.pl index 0317ba3..477ee2c 100755 --- a/scripts/nicklist.pl +++ b/scripts/nicklist.pl @@ -5,7 +5,7 @@ use strict; use IO::Handle; # for (auto)flush use Fcntl; # for sysopen use vars qw($VERSION %IRSSI); -$VERSION = '0.4.6'; +$VERSION = '0.4.7'; %IRSSI = ( authors => 'Wouter Coekaerts', contact => 'coekie@irssi.org', @@ -13,7 +13,7 @@ $VERSION = '0.4.6'; description => 'draws a nicklist to another terminal, or at the right of your irssi in the same terminal', license => 'GPLv2', url => 'http://wouter.coekaerts.be/irssi', - changed => '29/06/2004' + changed => '20/03/2017' ); sub cmd_help { @@ -193,7 +193,7 @@ sub screen_size { unless (defined &TIOCGWINSZ) { die "Term::ReadKey not found, and ioctl 'workaround' failed. Install the Term::ReadKey perl module to use screen mode.\n"; } - open(TTY, "+</dev/tty") or die "No tty: $!"; + open(TTY, "+<","/dev/tty") or die "No tty: $!"; unless (ioctl(TTY, &TIOCGWINSZ, $winsize='')) { die "Term::ReadKey not found, and ioctl 'workaround' failed ($!). Install the Term::ReadKey perl module to use screen mode.\n"; } |