diff options
| author | David Leadbeater | 2014-10-17 12:42:10 +0100 |
|---|---|---|
| committer | David Leadbeater | 2014-10-17 12:42:10 +0100 |
| commit | 263a56d196da657b72ccf2b195b50008d6a988dc (patch) | |
| tree | 0dda93c18238af498996c1410354e4fc9606f03a | |
| parent | cbcf35aed595db954303831acd343695f0575c07 (diff) | |
| parent | b092ffb6e08643a7dc553369eac6d2dcd205f0c3 (diff) | |
| download | scripts.irssi.org-263a56d196da657b72ccf2b195b50008d6a988dc.tar.bz2 | |
Merge pull request #59 from obfuscoder/8ball
Fix perlcritic issues in 8ball
| -rw-r--r-- | _data/scripts.yaml | 4 | ||||
| -rw-r--r-- | scripts/8-ball.pl | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/_data/scripts.yaml b/_data/scripts.yaml index 2ba3e52..c25007e 100644 --- a/_data/scripts.yaml +++ b/_data/scripts.yaml @@ -3,11 +3,11 @@ contact: "gein@knivby.nu" description: "Dont like to take decisions? Have the 8-ball do it for you instead." filename: "8-ball.pl" - modified: "2008-05-22 00:59:07" + modified: "2014-10-17 12:37:00" license: "GPL" modules: "IO::File" name: "8-ball" - version: "0.20" + version: "0.21" - authors: "Dani Soufi (compengi)" contact: "IRC: Freenode network, #ubuntu-lb" diff --git a/scripts/8-ball.pl b/scripts/8-ball.pl index 04564a7..5087080 100644 --- a/scripts/8-ball.pl +++ b/scripts/8-ball.pl @@ -28,7 +28,7 @@ use vars qw($VERSION %IRSSI); use Irssi qw(command_bind signal_add); use IO::File; -$VERSION = '0.20'; +$VERSION = '0.21'; %IRSSI = ( authors => 'Patrik Jansson', contact => 'gein@knivby.nu', @@ -46,7 +46,7 @@ sub public_question { my ($server, $msg, $nick, $address, $target) = @_; question($server, $msg, $nick.": ", $target); } -sub question($server, $msg, $nick, $target) { +sub question { my ($server, $msg, $nick, $target) = @_; $_ = $msg; if (!/^8-ball/i) { return 0; } |