diff options
| -rw-r--r-- | _data/scripts.yaml | 8 | ||||
| -rw-r--r-- | _testing/config.yml | 2 | ||||
| -rwxr-xr-x | scripts/nicklist.pl | 6 | ||||
| -rw-r--r-- | scripts/query.pl | 6 |
4 files changed, 10 insertions, 12 deletions
diff --git a/_data/scripts.yaml b/_data/scripts.yaml index 0d9ff83..1e29aa2 100644 --- a/_data/scripts.yaml +++ b/_data/scripts.yaml @@ -3302,10 +3302,10 @@ description: 'draws a nicklist to another terminal, or at the right of your irssi in the same terminal' filename: nicklist.pl license: GPLv2 - modified: '2014-06-10 12:58:13' + modified: '2017-03-20 19:38:25' name: nicklist url: http://wouter.coekaerts.be/irssi - version: 0.4.6 + version: 0.4.7 - authors: c0ffee commands: 'nickmix stopmix' @@ -3840,10 +3840,10 @@ description: 'Give you more control over when to jump to query windows and when to just tell you one has been created. Enhanced autoclose.' filename: query.pl license: GPL - modified: '2009-04-25 11:27:28' + modified: '2017-03-20 20:22:57' name: query url: http://ninja.no/irssi/query.pl - version: '1.24' + version: '1.25' - authors: "Stefan 'tommie' Tomanek" contact: stefan@pico.ruhr.de diff --git a/_testing/config.yml b/_testing/config.yml index 28dc28f..34c9c6d 100644 --- a/_testing/config.yml +++ b/_testing/config.yml @@ -50,11 +50,9 @@ whitelist: - log2ansi - mkshorterlink - newsline - - nicklist - oidenty - 'on' - osd - - query - quizmaster-fr - quizmaster - quiz 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"; } diff --git a/scripts/query.pl b/scripts/query.pl index 1d472ea..9d69aad 100644 --- a/scripts/query.pl +++ b/scripts/query.pl @@ -16,7 +16,7 @@ use POSIX; # ======[ Script Header ]=============================================== use vars qw{$VERSION %IRSSI}; -($VERSION) = '$Revision: 1.24 $' =~ / (\d+\.\d+) /; +($VERSION) = '$Revision: 1.25 $' =~ / (\d+\.\d+) /; %IRSSI = ( name => 'query', authors => 'Peder Stray', @@ -44,7 +44,7 @@ sub load_defaults { local *FILE; %defaults = (); - open FILE, "< $file"; + open FILE, '<',$file; while (<FILE>) { my($mask,$maxage,$immortal) = split; $defaults{$mask}{maxage} = $maxage; @@ -59,7 +59,7 @@ sub save_defaults { my $file = Irssi::get_irssi_dir."/query"; local *FILE; - open FILE, "> $file"; + open FILE, '>', $file; for (keys %defaults) { my $d = $defaults{$_}; print FILE join("\t", $_, |