added "use strict" for all scripts, made some small changes.

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1639 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2001-07-16 20:22:45 +00:00 committed by cras
commit 69a6096b8b
8 changed files with 37 additions and 31 deletions

View file

@ -1,12 +1,12 @@
# "Hello, world!" script :) /hello <nick> sends "Hello, world!" to <nick>
use Irssi;
use strict;
sub cmd_hello {
my ($data, $server, $channel) = @_;
$server->command("/msg $data Hello, world!");
return 1;
}
Irssi::command_bind('hello', 'cmd_hello');