diff options
| -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 29a0b31..0868a14 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; } |