summaryrefslogtreecommitdiffstats
path: root/scripts/autowhois_simple.pl
diff options
context:
space:
mode:
authorObfuscoder2014-10-17 18:30:46 +0200
committerObfuscoder2014-10-24 19:27:38 +0200
commitd2b44a7bb135579368f93e7d4824480c000eaa64 (patch)
tree3bddc3d5ef008dbf6aa5cf909ffb180bebfe4544 /scripts/autowhois_simple.pl
parentff9a44047a299bce4995c22fd6f15851e1b065ee (diff)
downloadscripts.irssi.org-d2b44a7bb135579368f93e7d4824480c000eaa64.tar.bz2
Fix perlcritic issues for all scripts starting with a
Diffstat (limited to 'scripts/autowhois_simple.pl')
-rw-r--r--scripts/autowhois_simple.pl6
1 files changed, 3 insertions, 3 deletions
diff --git a/scripts/autowhois_simple.pl b/scripts/autowhois_simple.pl
index 74ae039..154f9b0 100644
--- a/scripts/autowhois_simple.pl
+++ b/scripts/autowhois_simple.pl
@@ -3,13 +3,14 @@
# only when the query window has been created
# and therefore works only with irssi with
# default query window behaviour.
+use strict;
use Irssi;
use vars qw($VERSION %IRSSI);
$VERSION = "0.1";
%IRSSI = (
authors=> "Janne Mikola",
- contact=> "janne@mikola.info",
+ contact=> "janne\@mikola.info",
name=> "autowhois_simple",
description=> "/WHOIS anyone querying you automatically.",
license=> "GPL",
@@ -18,8 +19,7 @@ $VERSION = "0.1";
changes=> "v0.1: Initial release"
);
-# Global
-$handle_this_query = 0;
+my $handle_this_query = 0;
# Checks the birth of a new query window.
sub new_query {